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ERASE UNA VEZ... 

Erase una vez una editorial que 
editaba unas revistas de informática. 
Entre las revistas de informática que 
editaba dicha editorial había una de 
ellas que se dedicaba a una norma 
estándar, que no era otra que el 
MSX. 

Los privilegiados cerebros que 
formaban el núcleo de la redacción 
de dicha revista, se dijeron un día: 
"Habrá que dar a nuestros lectores 
algo más que colorines y teoría en 
nuestra revista. Como cuidamos tan 
bien a nuestro público y nuestra 
publicación es tan barata, vamos a 
darles algo realmente útil para que 
todavía nos quieran más." 

Y buscando, buscando llegaron a la 
siguiente conclusión: 

"Para poder dar a nuestros 
queridos lectores información de 
primera mano, y poderles explicar 
nuestras experiencias sobre casos 
concretos hemos de tener un 
ordenador en nuestra redacción." 

Y una vez dicho esto, se fueron 
contentos y felices, puesto que 
habían dado con la solución a todos 
sus problemas, pero la alegría de 
haber dado con la solución les hizo 
olvidarse de comprar el ordenador. 
Fue una lástima que esa no fuera la 
única editorial que se dedicaba a ese 
tema, porque cuando comenzaron a 
publicar experiencias prácticas, se 
dieron cuenta que otra editorial 
llevaba ya tres años haciendo 
precisamente eso. 

Esperamos que os haya gustado este 
cuento, ya que no es otra cosa que 
eso. Pero como todos los cuentos 
tiene su parte de verdad además de 
una moraleja. Pero esta se la 
dejaremos a nuestros lectores para 
que cada cual saque la suya. Feliz 
verano. 

MANHATTAN' 
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PANTALLAS EN 
CASSETTE 




Tengo un programa-car- 
tucho ROM Sony «GRA- 
PHIC MASTER» que des- 
pués de dibujar en pantalla 
no tengo ningún problema 
para grabar los dibujos, tan- 
to en disco como en cinta. 

El problema surge cuan- 
do intento acceder a los di- 
bujos desde el BASIC. Con 
los grabados en disco es fá- 
cil: BLOAD "nombre", S; 
pero no así con los grabados 
en cinta. ¿Cómo puedo ha- 
cer lo mismo con los dibujos 
en cinta? 



Juan Paloma Tutusaus 
BARCELONA 



El DISC-BASIC incorpora 
un par de instrucciones para 
leer y grabar pantallas gráfi- 
cas del disco (BSAVE,S y 
BLOAD,S). Sin embargo no 
existen estas instrucciones en 
el BASIC para cinta. 

El programa que nos co- 
mentas graba las pantallas en 
la cinta mediante una rutina 
especial que incorpora. Para 
poder recuperar dichas panta- 
llas desde el BASIC haría fal- 
ta estudiar cómo lo realiza el 
propio ürograma (desensam- 
blándolo y estudiando su lis- 
tado en C.M.) y realizar una 
rutina en ensamblador que 
permita imitar este proceso 
desde el BASIC. 

Nada fácil, como ves, a no 
ser que tengas unos mínimos 
conocimientos de lenguaje 
ensamblador y de la forma de 
leer y grabar en cinta que uti- 
lizan los ordenadores MSX. 

Desgraciadamente no po- 
demos ayudarte a este respec- 
to, ya que no disponemos del 
programa que nos comentas 
en la redacción para poderlo 
estudiar a fondo. 
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MSX-2 Y COMPILADOR 
BASIC 

¿Se podría hacer un pro- 
grama en BASIC MSX-2, 
pasarlo a código máquina 
con un compilador MSX y 
luego ese programa hacerlo 
funcionar en un MSX-1? 

¿Hay software MSX-2 en 
cinta? ¿Dónde puedo en- 
contrarlo? 

Francisco Montes Alcaraz 
Cartagena (Murcia) 

Lo que propones en tu pri- 
mera pregunta sería posible 
siempre que se cumpliesen 
varias condiciones. En pri- 
mer lugar el programa en BA- 
SIC MSX-2 no podría uti- 
lizar ninguna de las nuevas 
prestaciones de los MSX-2, 
ya que éstas no existen en los 
MSX-1. Además, el compila- 
dor de BASIC debería ser 
compatible con todos los 
MSX, tanto de primera como 
de segunda generación. 

Respecto a tu segunda pre- 
gunta, efectivamente existe 
software para MSX-2 en cin- 
ta, aunque poco por el mo- 
mento. Te atamos, por ejem- 
plo, el programa "The Chess 
Game" distribuido por Phi- 
lips para MSX-2 en formato 
cinta. 



ACOSO EN NICARAGUA 

En el programa ACOSO 
EN NICARAGUA del nú- 
mero 12 de vuestra revista 
me falta la instrucción 1690 



y me da error en el test de lis- 
tado en la línea 1680. 

Da la impresión de que 
falta una línea y la 1680 se ha 
montado con el final de la 
1690. 

Carlos Media Pont 
Monzón (Huesca) 

En primer lugar hemos de 
decirte que tienes razón y que 
el programa aparecido en el 
número 12 de nuestra revista 
tiene el fallo de montaje que 
nos comentas. 

Sin embargo, en cuanto 
fue detectado el error, publi- 
camos la corrección. Te in- 
cluimos el listado correcto de 
las dos líneas problemáticas: 
1680 PUTSPRITEO, 

(250,209), 15, 13 
1690 IF E$ = " " THEN FOR 

T=0TO50.NEXT 

T. GOTO 1650 ELSE 

RETURN 



MSXVERSUSSPECTRUM 

Quisiera saber si actual- 
mente se comercializa algún 
tipo de cartucho para pasar 
de MSX a MSX-2. También 
me gustaría que aconsejaran 
a un amigo que no se decide 
sobre si comprar un CA- 
NON V-20 o un SPEC- 
TRUM. 

¿Dónde puedo hacer que 
reparen un L )RIC-ATMOS? 

Federico Martí Pons 
Mercadal (Menorca) 

Por el momento no se co- 
mercializa este cartucho, y 
nos tememos mucho que tar- 
dará bastante en aparecer. 
Las diferencias entre ambos 
sistemas son lo suficiente- 
mente notables como para 
hacer de este cartucho una 
"tarea difícil!' . No descarta- 
mos, sin embargo, la posibili- 
dad de que más adelante lle- 
gue a nuestros mercados al- 
gún tipo de ampliación que 
incluya los nuevos elementos 
incorporados a los MSX-2 
para que los usuarios de 
MSX-1 puedan disfrutar de 
las ventajas de los ordenado- 
res de la segunda generación. 

Respecto a que aconseja- 
mos a tu amigo sobre la deci- 
sión entre un Spectrum o un 
MSX, no hay duda posible. 
Los MSX tienen un BASIC, 
muchísimo más potente que 
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el de Spectrum, los gráficos 
de MSX son mucho mejores 
que los de Spectrum, incluso 
programando en CM. se no- 
tan las ventajas que incorpo- 
ra la ROM de los MSX frente 
a la del Spectrum, mucho más 
pobre en rutinas interesan- 
tes. 

En general, y en vista de 
las características técnicas de 
ambos aparatos, los Spectrum 
"no tienen nada que hacer" 
frente a los MSX. La única 
voz levantada en favor de 
Spectrum es el mayor número 
de programas que existen en 
el mercado para este ordena- 
dor, debido a su larga estan- 
cia en el mercado; pero cada 
día son más los títulos que se 
incorporan al mercado MSX. 

Sin duda creemos que la 
elección del CANON V-20 es 
la mejor solución para tu 
d mi^o debido a la alta calidad 

dar frente a sus. competido- 
res. 

Respecto a tu última pre- 
gunta, hemos de decirte que, 
pese a conocer bien el ordena- 
dor del que nos hablas, no co- 
nocemos quien es actualmen- 
te el importador o distribui- 
dor en España del mismo. Di- 
rígete al comercio en que 
compraste el ordenador, ya 
que son ellos los que deben 
responsabilizarse de las repa- 
raciones de los aparatos que 
venden. 



MSX-2 Y MSX-1 



Ante la superioridad de 
los MSX-2 sobre nuestros 
MSX-1, y si tenemos en 
cuenta que en cuestiones de 
memoria, resolución de 
pantalla y demás son muy 
superiores, ¿no es posible 
que con el tiempo los fabri- 
cantes de este estándar se 
dedicaran únicamente a los 



de la segunda generación 
dejándonos de lado? 

¿Qué he de hacer para 
que me publiquéis un pro- 
grama sin participar en 
vuestro concurso? 

José F. Doncel 
BURGOS 

Resulta evidente la supe- 
rioridad de los MSX-2 frente 
a los MSX de primera genera- 
ción; pero los fabricantes de 
ordenadores MSX han de- 
mostrado una mayor serie- 
dad que otros fabricantes de 
ordenadores en este aspecto. 
Los MSX de primera genera- 
ción están teniendo ahora 
tanto o más apoyo que en el 
momento de salir al mercado. 

Existe, claro está, un gran 
interés por los MSX-2; pero 
se intenta que esto no afecte a 
los usuarios de MSX : 1. Es 
ahora cuando empiezan a lle- 
gar programas en gran canti- 
dad para los MSX de primera 
generación así que no tenéis 
de qué quejaros. 

En un futuro, nadie sabe lo 
que puede pasar; pero es de 
esperar que los fabricantes de 
MSX continúen con su políti- 
ca de servicio a sus usuarios. 

Respecto a enviarnos pro- 
gramas sin participar en el 
concurso, sólo tienes que in- 
dicárnoslo en la carta que nos 
envíes junto al programa. 
Pero te avisamos, así como a 
otros lectores, que en este nú- 
mero incluimos ya las bases 
de un nuevo concurso abierto 
a todos nuestros lectores. 



CARGA DE DATOS DEL 
CASSETTE 

En el número 8 de su for- 
midable revista aparece un 
programa llamado "Agen- 
da". He verificado línea por 
línea el programa y está 
bien. He introducido 42 fi- 
chas en la agenda, sin nin- 
gún problema, pero cuando 
cargo de la cinta a memoria 
e intento leer la ficha 16 (por 
ejemplo), llega un momento 
en que se corta la lectura 
para al cabo de un rato se- 
guir leyendo, repitiéndose 
este proceso en numerosas 
ocasiones. 

¿Hay alguna línea mal? 




Francisco Sánchez 
Esplugues 
(BARCELONA) 

Elefe do que comentas es 
perfectamente normal cuan- 
do los datos están grabados 
en formato ASCII, cosa que 
ocurre en este programa de 
AGENDA. 

Existen dos formatos dife- 
rentes para grabar, por ejem- 
plo, un programa en BASIC. 



La primera forma es grabarlo 
como bloque de bytes. En 
este formato se graban los 
programas que grabamos con 
CS AVE o con BSAVE. . 

La segunda forma consiste 
en grabar el programa o con- 
junto de datos en ASCII. De 
esta forma para cada carácter 
se graba un código específico. 
En este segundo modo de gra- 
bación, utilizado por los fi- 
cheros en cinta o bien por los 
programas grabados con 
SA VE, el conjunto de datos 
se divide en bloques de 128 o 
256 bytes, que son grabados 
como grupos separados. Esta 
es la razón de que la cinta se 
pare cada "x" fichas. 

No se trata, por tanto, de 
ningún error en el programa 
sino de algo absolutamente 
normal en los ficheros de da- 
tos grabados sobre cinta y la 
única solución posible consis- 
te en utilizar una unidad de 
disco para los ficheros, ya que 
es el medio idóneo para ellos. 



CARATULAS DE JUEGOS 



¿Qué rutinas habría que 
emplear para que cuando 
empiece a cargar una cinta 
con un programa hecho por 
mí salga la presentación 
mientras se carga el resto del 
programa, como ocurre en 
vuestras cassettes? 

Alvaro Pérez Magariño 
BURGOS 

Hacer que aparezca una ca- 
rátula de presentación mien- 
tras se carga el programa es 
algo muy extendido entre los 
programadores de videojue- 
gos. Prácticamente la totali- 
dad de los juegos de calidad 
incorporan una pantalla de 
presentación durante la espe- 
ra a la carga del videojuego. 

Hacerlo es bastante senci- 
llo. Debes realizar para ello 
dos programas . En el primero 
debes realizar el dibujo de 
presentación. Cuando se ter- 
mine el dibujo debes añadir 
una instrucción que cargue el 
segundo programa (CLOAD, 
RUN "CAS." o BLOAD 




"CAS:",R). El segundo pro- 
grama es el juego en sí, que se 
cargará mientras observas el 
dibujo realizado por el pri- 
mer programa. 

Esperamos ver pronto las 
carátulas de tus juegos, así 
como las de nuestros otros 
lectores. 
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GRABAR PROGRAMAS EN 
ENSAMBLADOR MSX 



¿Los programas en C.M. 
se almacenan correlativa- 
mente de forma que sabien- 
do su longitud se puedan 
calcular sus direcciones de 
inicio y final? 

¿Cómo se podría tener 
idea de los direccionamien- 
tos de un ordenador, para 
no meter los programas den- 
tro de la ROM, por ejem- 
plo? 

¿Podrían almacenarse los 
programas o parte de ellos 
fuera de la zona de usuario? 

¿Cómo podría hacer que, 
cargando un juego con 
LOAD "XXXX",R en vez 
de comenzar al principio, 
comenzara en una determi- 
nada línea? 

Renedo Gil 



Los programas en C.M. se 
almacenan normalmente de 
forma correlativa en memo- 
ria (a no ser que los divida- 
mos en trozos), de modo que 
conociendo sus direcciones 
puedes calcular fácilmente su 
longitud, o calcular su direc- 
ción final conociendo su lon- 
gitud y la dirección de inicio. 

¿Cómo se podrían saber- 
las direcciones utilizables de 
los MSX? Preguntándonos- 
las a nosotros, por ejemplo. 
\m ROM que contiene al BA- 
SIC MSX se halla entre las di- 
recciones y &H7FFF (0 y 
32767 en decimal). 

Más adelante, a partir de la 
posición &HF37F se encuen- 
tra la zona de variables del 
sistema y de ganchos de la 
ROM, en la que es preferible 
no introducirse si no se sabe 
bien lo que se está haciendo. 

El resto de la memoria 
RAM es perfectamente utili- 
zable en C.M., a no ser que 
dispongas de unidad de disco, 
en cuyo caso el límite supe- 
rior se ve disminuido hasta la 
dirección &HD400 aproxi- 
se ini- 



cia la zona de trabajo del dis- 



co. 



Es posible almacenar pro- 
gramas fuera de la zona de 
memoria de usuario. Para 
ello deberás trabajar con los 
SLOTS de RAM, siem¡yre 
que tu ordenador cuente con 
más de 48 Kb de memoria 
RAM. Dedicaremos en breve 
un artículo sobre el funciona- 
miento de los slots; pero si 
tienes prisa te remitimos a la 
sección CALL de nuestra re- 
vista, que ya ha tratado en al- 
guna ocasión este tema. 
Por último, no existe nin- 
una forma, al menos senci- 
', de hacer que un programa 
comience a funcionar a partir 
de una línea determinada con 
la instrucción LOAD 
"XXXX" ,R. Te recomenda- 
mos, en todo caso, que inclu- 
yas como primera línea un 
GOTO a ta línea en que de- 
sees que comience la ejecu- 
ción del programa. 

DE TODO UN POCO 



Quisiera preguntaros si es 
posible que la casa SERMA 
me envíe alguno de sus pro- 
gramas contra reembolso, ya 
que por cheque me es impo- 
sible. 

¿Cómo es posible grabar 
el PERSONAL DATA 
BANK de mi Hit-BIT 75P 
en cinta? 

¿Continúa SONY fabri- 
cando el cassette de ordena- 
dor SDC-500? 

¿Es posible que el cursor 
parpadee continuamente? 

Carlos Casares 
Las Arenas (VIZCAYA) 

A tu primera pregunta he- 
mos de responderte que sí. 
SERMA realiza ventas de sus 



programas por medio del co- 
rreo, contra reembolso o me- 
diante talón bancario. Para 
poder hacer uso de esta posi- 
bilidad debes escribir a; 
SERMA 

C/. Cardenal Belluga, 21. 
28028 MADRID 
Telfs.. 256 21 01/02 

Aunque no disponemos en 
estos momentos de un HB 
75P creemos recordar que el 
PERSONAL DATA BANK- 
dispone de una opción que 
permite la grabación en cinta 
de los datos almacenados en 
su memoria. Te recomenda- 
mos que repases el manual 
del programa para una mayor 
información sobre esta op- 
ción y su funcionamiento. 

Respecto al cassette de or- 
denador SDC-500 de Sony, 
no tenemos ninguna noticia 
de que se haya dejado de fa- 
bricar. Puedes dirigirte para 
conseguirlo a cualquier dis- 
tribuidor de Sony, o bien di- 
rectamente a: 
SONY ESPAÑA 
C/. Sabino Arana, 42-44. 
08028 Barcelona 
Tel.: 330 65 51. 

Por último, no resulta ex- 
cesivamente difícil realizar 
un programa que, mediante 
interrupciones, haga parpa- 
dear el cursor deforma conti- 
nuada. Sin embargo para ello 
precisarás de unos mínimos 
conocimientos de programa- 
• ción en ensamblador. En de- 
finitiva se trata de un progra- 
ma no excesivamente compli- 
cado al que no vemos dema- 
siada utilidad. 

Para realizar este progra- 
ma deberías parchear (siem- 
pre desde lenguaje ensambla- 
dor) la dirección de control 
de interrupciones y realizar 
desde allí un salto a tu pro- 
grama que encendiera y apa- 
gara el cursor por medio de 
sendas llamadas a la ROM. 
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TAMAÑO DE LAS LETRAS 
Y PIRATERIA 

¿Se puede disminuir el ta- 
maño de las letras (texto) en 
SCREEN2?¿Cómo? 

Tengo un DRAGON 
MSX-64 y tengo varios pro- 
gramas de las direcciones 
34816, 51264 y 51200. Si el 
programa es de un bloque se 
me ejecuta perfectamente; 
pero si es de dos bloques a la 
hora de salir se me bloquea 
el ordenador. 

¿Qué podría hacer para 
que los programas de dos 
bloques se ejecutaran? 

¿Puedo hacer que dos 
bloques queden como uno 
sólo al grabarlos? 

Tico Moreno 
Monteada 
(BARCELONA) 

Cambiar el tamaño de las 
letras en SCREEN 2 no es fá- 
cil. Los caracteres que apare- 
cen al hacer PRINT con pan- 
tallas de gráficos (2 ó 3) no 
permanecen en la VRAM, 
sino en la ROM del BASIC, 
por lo que no son modifica- 
bles (a! menos de un modo 
sencillo). 

Sin embargo existe una so- 
lución muy asequible a tu 
problema, consistente en di- 
bujar las letras. Es decir, por 
medio del comando DRAW, 
o de líneas consecutivas dibu- 
jar cada uno de los caracteres. 
Si conoces algo de lenguaje 
máquina te será fácil darle ve- 
locidad a este proceso de di- 
bujo. 

Respecto a los programas 
de dos bloques que no te car- 
gan hemos de decirte que, por 
las direcciones que nos co- 
mentas, deducimos que se 
trata de copias piratas y que, 
debido al mal hacer de la gran 
mayoría de piratas de nuestro 
país, no cargan en muchos or- 
denadores. No busques solu- 
ción en tu aparato, sino en el 
pirata que realizó la copia del 
programa. No podemos dar- 
te, por lo tanto, solución a tu 
problema. 



¡¡COMPLETA TU HEMEROTECA DE PROGRAMAS!! 
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¡SI TE HACE FALTA ALGUN NUMERO DE 




PIDELO HOY MISMO! 



Para contar con la más completa colección de programas de MSX sólo tienes que recortar o fotocopiar el cu- 
pón y dirigirlo a Dpto. Suscripciones MSX CLUB DE PROGRAMAS. Roca i Batlle, 10-12. 08023 Barcelona. 



i BOLETIN DE PEDIDO . , 

Sí, deseo recibir hoy mismo los números de MSX CLUB DE PROGRAMAS, libre de 

I gastos de envío, por lo que adjunto talón n.° del Banco/Caja I 

| por el importe de ptas. a nombre de MANHATTAN TRANSFER, SA. 1 

I NOMBRE Y APELLIDOS I 

I CALLE N ° CIUDAD 4} . 

L DP z .. z PROVINCIA TEL J 



Tablón de anuncios 



Esta sección de MSX CLUB es de nuestros lectores. Todos ellos tienen derecho a dos inserciones totalmente gratuitas. Las características 
de esta sección no permiten la inclusión de anuncios con fines de lucro. Advertimos que la desprotección y copia de software original es 
un acto delictivo perseguido por la ley. 



Vendo ordenador SVI-328, 
Expander SVI-605 con 2 uni- 
dades de disco de 5 1/4 (252 Kb 
formateadas por disco), moni- 
tor FONTEC (fósforo verde), 
S.O. CP/M-80, disco EXTEND 

castellano). Libros de instruc- 
ciones y varios libros. Preferi- 
ble venta en BARCELONA o 
CATALUÑA. No vendo por 
partes. Precio total: 125.000 
ptas (negociables). José Ra- 
món. (93) 568 45 41.' A partir 
de las 10 de la noche. CP.l. 
Cambio diez magníficos pro- 
gramas en cassette (entre ellos 
Camelot Warriors) por el car- 
tucho CHAMP E/D de Micro 
Byte "original" o por cualquier 
otro de juegos o aplicaciones 
originales. Gonzalo Márquez 
Benít. C/. Ntra. Sra. Merced 
s/n. Ci J . Alioxaní. CORDOBA. 
CP.l. 

Compro unidad de disco MSX- 
2 de 3,5 pulgadas, barata. La 
marca me da igual. M. Garrido 
Pareja. C/Bib-rambla 22, 1.° 
Telf: (958) 22 28 52. GRANA- 
DA. CP.l. 

Vendo SV1-728 con nueve me- 
ses de vida, cassette DYNA- 
DATA y cartucho BASIC TU- 
TOR por 30.000 ptas. Monitor 
blanco y negro (SONY) por 
15.000 ptas. Ponciano Criado 
Pérez. C/. Santa Cecilia n.° 7, 
5 A. Tlf: 202311. 15690 LA 
CORUNA. CP.l. 
Vendo juegos originales Oh 
Shit!, Fórmula 1, Gnostbusters 
y Deus ex Machina todo por 
8000 ptas. También por separa- 
do. Alvaro Francio Núñez Fer- 
nández. Plaza de Andalucía n.° 
3, 2." -6. Marbella. 29600 (Mála- 
ga). CP.l. 

Vendo/Cambio manuales del 
Canon V-20 en inglés por los 
mismos en español o similares. 
También cambio programas 
originales. Angel Peña Sán- 
chez. C/. Obispo B. n.° 95. 
23320 TORREPEROGIL 
(JAEN). Tlf: (953) 776024. 
CP.l. 

Vendo Philips VG-8010 con 
expansión de 64 Kb y 75 pro- 
gramas por 35.000 ptas. Tlf: 27 
56 41. La Coruña. Preguntar 
por José. CP.l. 

Vendo joystick Quick-Shot 
II sin estrenar y 2 juegos como 
son Ghostbusters y Maziacs 
por sólo 2000 ptas. Luis Rodrí- 



guez Ribes. C/. Museros n." 5. 
3,6. Tlf: (964) 23 06 65. 12005 
CASTELLON. CP.l. 
Intercambio juegos MSX. Bus- 
co Yie Are, Kung fu. Llamar de 

16 a 22 horas al Tel.: (938) 67 

17 24 o escribir a: Fernando 
Pérez Pérez C/ San Rafael, 4. 
35018 Las Palmas de Gran Ca- 
naria. CP.l 

Compro programas y juegos en 
cinta para MSX2. También 
compro ensamblador / desen- 
samblador con instrucciones. 
Cambio juegos MSX, poseo 
más de 200. Francisco Montes 
Alcaraz. C/ Cata, 3. Los Dolo- 
res, Cartagena (Murcia) Tel.: 
(968)51 46 82. Horas no labo- 
rables. CP.l. 

Vendo por 1.500 ptas. progra- 
ma original CW-RTTY emi- 
sión / recepción. Francisco R. 
Paya. C/ Reconquista 38 5. 
03800 Alcoy (Alicante). CP.l 
Compro cartucho de amplia- 
ción de 64 K. precio a convenir, 
referencia: Angel Querol. Bar- 
celona. Tel.: (93) 422 38 82. 
CP.l. 

Vendo o Cambio programas de 
MSX2. Poseo Red Lights of 
Amsterdam, Chopper II, Bad- 
max, Laydock, Perry Masón, 
Nemesis etc.. cada uno a 2.000 
pesetas. Antonio Muñoz Ran- 
do. C/ Energía, Bl/M Esc. 1 10 
2. Barcelona 08004. Tel.: 332 
72 34. CP.l. 

Vendo micro-ordenador Ca- 
non V20 1987. 64 K + cables y 
30 juegos. 20.000 ptas. M. Vrig- 
non Michel. 2 rué de L'aulnie- 
re. 85170 Saligny Francia. CP. 
1. 

Poseo libro de Código Máqui- 
na exclusivo para SVI-3 18/328 
y ensamblador / desensambla- 
dor para SVI-3 18/328. Intere- 
sados: Carlos Carbonell. Tel.: 
(91) 717 12 60 (de 15'00 a 
18 : 00).CP. 1. 

Vendo ordenador MSX Spec- 
travideo 728 de 80 ks, con ga- 
rantía, manuales y cables por 
sólo 22.500 pts. Todo en per- 
fecto estado. Programas y revis- 
tas de regalo. Tefl.: (972) 50 96 
57. De 9 a 10 de la noche. CP. 1. 
Doy ocho juegos en cinta a 
cambio de un cartucho de Ko- 
nami. Poseo los mejores de 
Erbe, varios de Konami, Taek- 
wondo, Samantha Foxx, etc. A 
ser posible gente de Madrid. 
Llamar martes y jueves a Rubén 
Fernández Santamaría. C/ Ca- 
marena, 824, A. 28047 Madrid. 



Tel.: 717 92 21. CP.l 
Vendo ordenador MSX VG- 
8020 (80K) Philips. Monitor 
BM-7552 de 12 pulgadas y alta 
resolución, cantidad de soft 
(unos 20 juegos y un programa 
de utilidades), revistas, cables, 
manual de instrucciones en cas- 
tellano, libros sobre Basic y Có- 
digo Máquina para MSX. Todo 

Í)or 45.000 ptas. ¡Si, si si, has 
eído bien! (además todo tiene 
un año). Augusto Emañes Lee. 
Avda. 311 n. 20 (Esq. 301) Cas- 
telldefels (Barcelona) Tel.: (93) 
665 20 32. CP.l. 
Vendo 6 juegos originales MSX 
cassette como nuevos: Cybe- 
run, Trailblazer, Avenger, The 
Cheist, Futúre Knight y A View 
to kill (James Bond). Por sólo 
5.000 ptas. Contrareembolso. 
Juan Ventura. Tel.: (93) 381 43 
82 Tardes San Adrián de Besos. 
(BCN)CP.l 

Vendo programa Laydock 
(MSX 2) de Sony en disco, a un 
70% menos del precio comer- 
cial. David. Tel.: (954) 63 53 
07. CP.l 

Vendo Ordenador MSX Phi- 
lips VG-8010 de 48K más am- 
pliación de memoria de 64K. 
Cassette ordenador COMPU- 
TONE, manuales de referencia 
y usuario, 20 juegos primeros 
títulos, curso de Basic. Todo 
por sólo 23.000 ptas. Juliancho 
o Alberto. Tel.: (948) 82 43 71 
de21h. en adelante. CP.l. 
Vendo X'press SVI738 MSX 
(Drive de 720Kb) con discos y 
manuales y monitor de fósforo 
verde K-40. Todo 85.000, sólo 
ordenador 70.000 pesetas. Muy 
poco uso, en garantía, compra- 
dos en febrero '87. Regalo pro- 
gramas. Tel. (974) 820869. 
CP.l. 

Vendo en perfecto estado por 
compra de un MSX-2, Ordena- 
dor Philips VG-8020 80K, te- 
clado profesional, con manual 
Basic y cables de conexión. Re- 
galo con el ordenador los si- 
guientes programas: Knight 
Mare, Soccer, La Pulga, King's 
Valley, Green Béret, Hiper Ra- 
lly, Super Cobra, Yie Ar, Kung 
Fu II. Todo por sólo 18.000 pe- 
setas. CP. 1 

Vendo cartucho SONY de am- 
pliación de memoria HBM-16 
poco usado, con caja original e 
instrucciones por 4.000 pese- 
tas. José Luis Benito Zurdo. C/ 
Segovia, 1. 05005 Avila. Tel.: 
(918) 22 27 63, de 14 a 15,30 



horas. CP.l 

Vendo impresora-plotter 
SONY PRN-C41 con acceso- 
rios alimentador, manuales y 
embalaje de origen. Precio a 
convenir. Llamar al Tel.: (93) 
357 88 22. CP.l. 
Vendo SVI-328, ordenador de 
gestión, apto para el sistema 
CPM2.2 y CPM 3.0 y lenguaje 
Basic, Cobol, Logo. 80Kb, cas- 
sette, 1 joystick, 14 programas 
(juegos y utilidades), manual de 
instrucciones. Todo en perfec- 
to estado por 50.000 pesetas. 
Tel. (9^)372 12 04. CP.l 
Vendo ordenador Spectravi- 
deo SVI-728 MSX 80K. Con 
garantía, más libros y 50 pro- 
gramas comerciales. Todo por 
30.000 pesetas. Intercambio 
programas, poseo más de 200. 
Llamar al tel. (943) 885474 a 
partir de las 18,30. Juan María 
Gorrotxategui. C/ Guipúzcoa, 
16 4.C. 20240 Ordizia (Gui- 
púzcoa). CP. 1 

Vendo ordenador SONY MSX 
HB-75P 64K, grabadora de 
cassettes, cassettes de juegos, 
cartucho de ajedrez y libros 
programación BASIC. Com- 
prado todo hace 4 meses. Ven- 
do por 45.000 pesetas. José Fo- 
rero Martín. (93) 353 59 44 de 
Barcelona. CP. 1 
Vendo ordenador MSX Spec- 
travideo 728 de 80 ks, con ca- 
bles, manuales y garantía por 
sólo 21.500 pts. Regalo gran 
cantidad de revistas y progra- 
mas originales. Llamar de 9 a 
10 de la noche al Tel.: (972) 50 
96 57. CP.l 

Vendemos todo tipo de pro- 
gramas: hablador, ensambla- 
dor, cambiador de slots (útil 
para pasar la ROM a la RAM), 
juegos. Hacemos programas. 
Poneos en contacto para catá- 
logo e información. Yellow- 
Soft. C/. Rocha, 44. 12414 Al- 
gimia de Almonacid. Castellón. 
CP.l. 

Vendo ordenador TOSHIBA 
HX-10, MSX de 80 Kb, com- 
pletamente nuevo. Con cables, 
libros, cinta demo, juegos y un 
cartucho «tenis» Konami. 
Todo por 25.000 pesetas. Jorge 
Beltrán. Tel.: (96) 178 39 64. 
Valencia. CP.l. 

Vendo cartucho original del 
«Road Fighter» por 3.000 pese- 
tas y las siguientes cintas origi- 
nales: Damas (Dimensión 
New) Base de Datos y Traduc- 
tor] 
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También vendo original U- 
Boot por 400 pesetas. Vendo/ 
cambio todo tipo de juegos y 
programas de aplicación en 
cinta y disco de 3,5". Interesa- 
dos contactar con Jordi Arias 
Ruiz. C/. Abad Escarré, 20-22; 
3°, 1. a Sant Boi 08830 Barcelo- 
na. CP.l. 

Vendo cassette lectora/graba- 
dora para ordenador por 2.500 
pts. Vendo los siguientes juegos 
por 1.500 pts.: Knighmare, 
Goonies, Green Beret, Neme- 
sis, Cosa Nostra, Livinston Su- 
pongo. También los vendo por 
separado. Antonio. Tel.: (93) 
652 16 94. CP.l. 
Vendo programas, juegos y uti- 
lidades MSX, Amstrad, Spec- 
trum y Commodore. También 
tengo un establecimiento auto- 
rizado donde los podrás encon- 
trar. Está en la plaza Bib Ram- 
bla, 80, grandes ofertas por 
traspaso a C/. Ronda, 116. Si 
llamas desde cualquier punto 
de España: Tel. : (958) 22 28 52. 
CP.l. 

Vendo ML10MA de Mitsubis- 
hi (ratón gráfico) a estrenar por 
15.000 pts., 10 juegos origina- 
les por 15.000 pts., o todo junto 
por 25.000. Escribir a Rafael 
Baena Serrano. C/. Avda. Feli- 
pe II, 22, 9-3 Móstoles (Ma- 
drid). CP.l. 

Vendo ordenador Sanyo 64 K 
+ Impresora Philips VW-0030 
Letter Quality + Monitor Phi- 
lips Fósforo naranja (todo poco 
uso) por 75.000 pts. Joan Serra 
Francés. C/. Alguersari, 5, 2.°, 
2. a . Sabadell. Tel.: (93) 725 44 
93. CP.l. 

Vendo ordenador Philips VG 
8010 de 48 Kb, comprado en 
1986, más cartucho de expan- 
sión de 64 Kb, más 25 juegos 
comerciales además de los ma- 
nuales y cables de conexión del 
propio ordenador. Precio a 
convenir. Llamar preferente- 
mente a partir de las 9 de la no- 
che a; Angel Julián Fernández, 
C/. Malo Munilla, 9. Tudela 
(Navarra). Tel.: 82 43 71. CP.l. 
Intercambio conocimientos 
avanzados en programación de 
juegos C.M. o . Basic MSX y 
MSX-2. Exclusivamente últi- 
mas novedades en software. 
Marcos Fajardo Orellana. Par- 
que Mediterráneo, Bloque 15, 
5. izda. Málaga. Tel.: (952) 34 
37 38. CP.l. 

Club «adictos al joystick» hace 
ampliación de socios. Nuestro 
nombre lo dice todo. ¡Apúnta- 
te a nuestro club! Para infor- 
marte llama al Tel.: (948) 23 63 
85. (Preguntar por Juan Luis). 
O escribe a Juan Luis de Pedro. 
Plaza Monasterio de Azuelo, 3. 
CP. 31011 Pamplona. CP.l. 



Intercambio formas de prote- 
ger y desproteger programas, 
ideas, estilos y experiencias. 
Consultas en general. Interesa- 
dos escribir a Pere. C/. Carde- 
nal Tedeschini, 19, 4.° 08027 
Barcelona. CP.l. 
Compro ampliación de memo- 
ria 64 K de cualquier marca. 
También compro unidad de 
disco. José Luis Stoduto Gar- 
cía. C/ Manuel Blasco, 8, 5.°-C. 
42004 Soria, CP.l. 
Busco intercambio programas 
GESTION, Compiladores Co- 
bol, Pascal. C, Fortran. En dis- 
co de 3,5. Noches 11 h. Tel.: 
(978)21 48 57. Alex. C/. 26 de 
Mayo, 15, 3.°-C. 24006 León. 
CP.l. 

Intercambio juegos originales 
(son 4) como «Camelot Wa- 
rriors», «Profanado/i», etc. 
Para contactar, llamar a los 
tels.: (958) 28 53 23 Angel, o al 
(958)27 63 95. Kiko. De 6,30 a 
9,00 noche. CP.l. 
Intercambio Hero, Keystone 
Kapers, Nightshade, ¡Oh Shit!, 
Alien-8, Show lumper, Snark 
Hunter, Jet fighter, Mercena- 
rio, Frog. Hasta 13 por un car- 
tucho de juegos. Javier Villaéci- 
ja Carrillo: C/. Independencia, 
384, Sá., 2. 08026 Barcelona. 
CP.l. 

Poseo 53 cartuchos, urge cam- 
biar por periféricos MSX, tam- 
bién ofrezco dinero: amplia- 
ción 64 K y 16 K; unidad de dis- 
co 3,5"; impresora, joysticks, 
monitor. En caso de no cam- 
biar, vendo los cartuchos a 
2.500. También te puedes ha- 
cer socio a mi mini club: tecleo 
los programas de la revista y los 
envío en cinta. Marcos Deive 
Novo. C/. Marola, 48, 4. a -D. La 
Coruña.Tel.:(981)2012 51,de 
3 a 4 tarde. CP.l. 
Cambio juegos originales 
«Knightmare», «Goonies» y 
«Green Beret» por Némesis 
(cartucho) y vendo juegos ori- 
ginales de Konami: Circus 
Charlie, Yie Air, King Fu, At- 
hletic Land, Hyper Sports 1. 
Precio a convenir. A.Y.K. Tel.: 
212 72 03 a partir de las 17 ho- 
ras. CP.l. 

Cambio Hyper Sports III en 
cartucho por Super Cobra o 
Hyper Rally en cartucho. Ale- 
jandro. Tlf.: (91) 315 72 00 a 
partir de las 17 h. CP.2. 
Vendo ordenador Philips 8020 
de 80 Kb y magnetófono Phi- 
lips. Precio a convenir. Alfonso 
Ramos. C/ Altozano 3. Villa- 
franca de los Barros. BADA- 
JOZ. Tlf.: (924) 52 07 67. CP.2. 
Compro ampliación de 64K o 
de 80K en cartucho para MSX. 
Manuel J. Bailón. C/ Sagrado 
Corazón, n.° 13, 3-1. 27003 



Compro o cambio por los jue- 
gos Knight Lore, Gunfright, 
Knight Shade, Jack the Nipper, 
Alien 8, WÜly II, bounder. Val- 
kyr y Show Jumper, todos origi- 
nales por un cartucho de am- 
pliación de memoria SONY de 
64 Kb. Ramón Ribalta. C/ Fi- 
gueroles n." 5, 1.". 12006 CAS- 
TELLON. CP.2. 
Cambio 13 juegos como RI- 
VER RIDE, KAGE, etc. y 27 
revistas por uno de los siguien- 
tes: GREEN BERET, KONA- 
MI, HYPER RALLY, KONA 
MI'S SOCCER, YIE AR 
KUNG FU 2, KARATE, BAS- 
KET. Pablo López Parrón. C/ 
Peñalara 24 6." A. 28760 Tres 
Cantos. MADRID. Tlf- (91) 
803 13 09. CP.2. 
Vendo ordenador Sony MSX 
en condiciones de estreno. In- 
teresados indicar oferta, siendo 
el coste del aparato de 40.000 
Ptas. Sr. Pedro García Espasa. 
C/Cienfuegos 13, 2."2. a . 08027 
BARCELONA. CP.2. 
Vendo Spectravídeo SVI-328, 
Iectoerabadora SVI-904, 
QuickShott II, 3 cintas dejue- 
gos y otra de introd. al BASIC, 
manuales en inglés y español y 
un libro de programación avan- 
zada por sólo 35.000 Ptas. Tesús 
Corrales. Tlf.: 467 13 84. Éran- 
dio. BISKAIA. CP.2. 
SADA CLUB-MSX, primer 
Concurso Nacional de Infor- 
mática MSX. Pidan informa- 
ción sin compromiso. Santos 
Arias Llórente. C/ Peña Larzón 
n/^5, 5AD. 24008 LEON. 

Vendo ordenador MSX SVI- 
728 de 80 Kb de RAM, unidad 
de disco doble cara SVI-707, 
monitor color Philips y cassette 
especial para ordenador SA- 
NYO DR-303. Tlf: 256 05 49. 
Llamar de 2 1 -22 H. faime San- 
cho. BARCELONA. CP.2. 

Vendo cassette recorder espe- 
cial para ordenador, modelo 
PHILIPS D-6020, por 5500 
ptas. Está valorado en 11000 y 
tiene un mes de uso. Jacobo. 
Tlf: (965) 222538 a partir de las 
7 de la tarde. CP.2. 
Vendo Philips VG-8010 MSX 
con muy poco uso. Se incluyen 
todos los cables, embalaje ori- 
ginal, dos manuales de BASIC 
v algunos juegos. Precio a con- 
venir. Jaime Rodríguez Pérez. 
C/^Los Formidables 18, 2.° 
Drcha. Reinosa (Cantabria). 
CP. 39200. Til: (942) 752845. 
CP.2. 

Compro ordenador, unidad de 
disco, impresora, joystick, etc. 
Armando. Apartado 274. Tala- 
vera 45600. (TOLEDO). CP.2. 
Vendo SVI-318 v data cassette 



les en inglés por 15000 ptas 
Antonio Llena. C/. Diagonal 
345. Barcelona. Tlf: 257 89 32. 
CP.2. 

Compro ampliación de memo 
ria, preferible de 64Kb, para 
HB-55P. Paco. Tlf: 618 38 67 
Móstoles. MADRID. CP.2. 
Vendo unidad de cassette SVI 
767 de Spectravídeo con un 
mes de funcionamiento. Precio 
a convenir. Juan Manuel Lo 
pez. O. Estadella. 90, 8." 2." 
4.* Buen Pastor. BARCELO- 
NA 08030. CP.2. 
Vendo PHILIPS MSX VG 
80 10 casi sin usar, con la garan 
tía, manual y todos sus acceso 
ríos, En perfecto estado v por 
sólo 20000 ptas. (negociables) 
luán Antonio Lafuente. Tlf 
(975) 370152. CP.2. 
Contacto con usuarios de 
MSX-2 y MSX- 1 con unidad de 
disco para intercambiar todo 
tipo de información, trucos, 
ideas, etc. M.E. Martínez. C . 
Alfonso I, 28. 50003 ZARA 
GOZA. CP.2. 

Contacto Sácale partido a ni 
MSX formando tu propia peña 
de lotería primitiva. Llama v te 
informaré. Programa de reduc- 
ción de combinaciones según la 
estadística. Desde 7 hasta 49 
números. Miguel Angel. TU: 
96-3651052 de 5 a 8 tarde Va 
lencia. CP.2. 

Compro cartuchos ROM para 
MSX-2, como GOLF, TEN 
NIS, FUTBOL, PING- 
PONG. CHESS. MAP y otros 
por el estilo. Lázaro de Soto. 
Apartado 300. 21080 HUEI. 
VA. CP.2. 

Vendo ordenador Spectravi 
deo SVI-738 con unidad de dis- 
co 3.5" incorporada. Incluvo 
discos CP/M y MS-DOS y un 
disco con programas MSX va- 
lorados en 48000 ptas, instruc- 
ciones y manual de manejo en 
castellano por 70.000 ptas. Jor- 
di. Tlf: (93)6544822. Fecha de 
compra del equipo, enero de 
1986. CP.2. 

Vendo procesador de textos ei i 
cartucho "HOMEWRITER" 
de Sony por 4000 ptas. M. Gó- 
mez Rociríguez. C/. Pedro An- 
tonio de Alarcón 62, 1A. 
CP. 18002. Tlf: (958) 280376. 
GRANADA. CP.2. 

Vendo 8 juegos de Konami. 
Poseo, entre otros. Ping-pong, 
Konami's Tennis, Road Figh- 
ter, Sky Jaguar, Atlethic Land, 
etc. Todos por 4000 ptas. Qui- 
Quo.TIf: (93) 85 12295, de F30 
a 4 tarde o bien a partir de las 
8*30 noche. BARCELONA 
CP.2. 

Vendo SONY HB-75P de 80 
Kb y un procesador de texto. 
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Además vendo impresora plot- 
ter SONY (MSX), bola gráfica 
con programa en cartucho y 
monitor-TV en color SONY 
todo ello nuevo. Se vende en 
conjunto o bien por separado. 
Precios a convenir. Miguel An- 
gel. Tlf. (91)279 67 97.CP.2. 
Vendo Mitsubishi ML-FXl, 
cables, manuales y cinta con 
juegos por 35000 ptas. José 
Luis Gutiérrez. C/. Subida del 
Guruguru, 3, 3 o Drecha. Tlf: 
274682. 39004 SANTANDER 
(Cantabria). CP.2. 
Cambio/vendo cartuchos 
MSX. Tengo muchos títulos 
(Avenger, Green Beret, Dam- 
busters, Las 3 luces de Glau- 
rung, etc.) Robert Buckner 
Muñoz. Hermanos Becerril 19, 
7°A. 16004 Cuenca. Tlf: 
222326. CP.2. 

Vendo SONY HB-75-80 Kb, 
manuales, cables y muchos pro- 
gramas comerciales. Todo por 
40.000 ptas. Octavio Llop Sal- 
vado. C/. Córcega, 111, 1.° 4. a 
D. Tlf: (93) 230 16 92. 08029 
BARCELONA. CP.2. 
Cambio/vendo juegos origina- 
les en cartucho. Tengo Sky Ja- 
guar, Green Beret, Xixolog, 
Chess y 3D Water Driver. Tlf: 
61 05 71. Juan Pastor Roldán 
Aviña. C/. Bami 21, 2°D. 
41013 SEVILLA. CP.2. 
Vendo cartridge-copy por 
5000 ptas. M. a Teresa Roca. C/. 
Ramón Llull, n.° 1, 3 o 2. a . 
25008 LERIDA. CP.2. 
Vendo MSX-2 Sony HB- 
F500P con unidad de disco de 
1 Mb. Teclado numérico. 128 
Kb de VRAM, conexión a mo- 
nitor. Sistema operativo y mu- 
chos juegos comerciales. 
100.000 ptas. Escribir a Luis 
Segura Salvador. C/. Castellini 
n.° 1, 3B. Cartagena. MUR- 
CIA. CP.2. 

Vendo ordenador Canon 
MSX, 80 Kb, unidad de disco 
de 3.5 pulgadas de 500 Kb, im- 
presora Philips 80 columnas y 
calidad de letra, 100 cps. Base 
de datos en disco MS-BASE; 
cartucho MAP con Base de Da- 
tos, Procesador de Textos, 
Contabilidad, Gráficos, Comu- 
nicaciones, muchos juegos en 
cartucho y cinta, libros, revis- 
tas, joystick. Todo muy barato 
y en buen estado. Manuel. Tlf: 
253 84 89, tardes. CP.2. 
Cambio un psicodélico de tres 
focos con regulación de volu- 
men, etc., nuevo a estrenar. Un 
órgano CASIO PT-82 con cin- 
ta de canciones, cámara foto- 
gráfica y una maquinita de cua- 
tro pantallas por ordenador 
MSX. Carlos Ordóñez. C/. 
Montsant 8-10, 2.° 2. a . 08820 
El Prat de Llobregat. BARCE- 
LONA. CP.2. 



BIENVEN 



TFT 





TJí.T. Termina con los peligros del castillo 
tenebroso armado con los barriles de T.N.T. 
Pero ¡ten mucho cuidado! Manipular los ex- 
plosivos es muy peligroso, y cualquier des- 
cuido puede ser fatal. PVP. 1.000 Pts. 




SKY HAWK. Dn magnífico Juego de simula- 
ción de vuelo. En él te conviertes en un piloto 
que na de derribar al enemigo y regresar al 
portaaviones sano y salvo. PVP. 1.000 pts. 




LOTO. Este es el programa que estaban espe- 
rando los usuarios de MSX para hacerse mi- 
llonarios cuanto antes. El complemento 
ideal a nuestro programa de quinie/as, con el 
que más de un lector se ha hecho rico. PVP. 
900 Pts. 



LORD WAT80N. Este es un Juego muy original 
que combina el laberinto con las palabras 
cruzadas. Los obstáculos fantásticos y el vo- 
cabulario son los alicientes . PVP. 1.000 pts. 



Ai A // 

1 - <l 



GARANTIA \ 



DEVTL'S CASTLE. La más original, amena y 
entretenida aventura hecha vldeojuego. 
Eres un mago que debe romper el hechizo de 
un castillo endemoniado, para lo cual... Exce- 
lentes gráficos y acción a tope. PVP. 900 Pts. 




MATA MARCIANOS. Dn Juego clásico en una 
versión cuya mayor virtud es su diabólica ve- 
locidad que aumenta a medida que superamos 
las oleadas de los invasores extraterrestres. 
PVP. 900 pts. 




CON GARANTIA 

1AKHA7TAM TDAKf 



V AM PIRE . Ayuda al audaz Guillermo a salir 
del castillo del Vampiro, sorteando murcié- 
lagos, fantasmas, etc. ün Juego terrorífica- 
mente entretenido para que lo pases de mie- 
do. PVP. 800 Pts. 



^QyjfÚkC? PARAMSX - 1 

G0PY 

POR JOAQUIN LOPEZ 

Menú* por vanUiui • tres 
formato* da coplas simulación 
en blanco y neüro - copla 



CON GARANTIA 

/V1/WW1AN TRANSFER 



HARD COPY. Para copiar pantallas. Tres 
formatos de copias, simulación por blanco y 
negro, copia sprltes, redefinic. de colores, 
compatible con todas las Impresoras ma- 
tric. PVP. 2.500 Pts. 




¿Cómo corregir los errores 
de transcripción de los 
programas? 
La solución a los errores en 
los programas es este TEST 
DE LISTADOS 



CON GARANTIA 

/I/IAKHATTAN TRAMSFFR SA 



TEST DE LISTADOS. El segundo programa de 
la Serie Oro es el útilísimo Test que te permi- 
tirá controlar la corrección de los progra- 
mas que copies de MSX CLUB y MSX EXTRA 
PVP. 500 Pts. 
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DOS A msxclub 




U- 

Z 



QUINIELAS 



wm 





KRYPTON. La batalla mas audaz de las gala- 
xias en cuatro pantallas y cuatro niveles de 
dificultad. Un juego cuya popularidad es cada 
vez mas grande entre los usuarios del USX. 
PVP. 500 Ptas. 



ON GARANTIA 



U-BOOT. Sensacional Juego de simulación 
submarina en la que tienes que demostrar tu 
pericia como capitán de un poderoso subma- 
rino de guerra. Panel de mandos, sonar, tor- 
pedos, etc. PVP. 700 Ptas. 



CON GARANTIA / 

4/IAN4AT1AN 'TÍN§w S A 



QUINIELAS. El mas completo programa de 
quinielas con estadística de la liga, de los 
aciertos, etc. e impresión de boletos. Acertar 
no siempre es cuestión de suerte. PVP. 700 
Ptas. 




SNAKE. Entretenido y muy divertido juego 
en el que Snake procura comer unos núme- 
ros que la engordan. Tanto las murallas que 
la rodean como su larga cola pueden ser 
mortales para ella. PVP. 600 Ptas. 





V3 




SI 



C<*<Wtftf¿TlA 



STAR RUNNER. Conviértete en el audaz 
piloto interestelar . y lucha a muerte, a 
través del hiperespacio, contra las defen- 
sas del Urano Daurus. Dos pantallas y 
cinco niveles de dificultad PVP. 1.000 pts. 

Si quieres recibir por correo certificado estas cassettes garantizadas recorta o copia este boletín y envíalo hoy mismo: 



EL SECRETO DE LA PIRAMIDE. Atrevido 
Juego de aventuras a través de los misterios 
y peligros que encierran los laberínticos pa- 
sillos de una pirámide egipcia. ¡Atrévete si 
puedes! PVP. 700 Ptas. 



FLOPPY, El Preguntón. Un verdadero desafio 
a tus conocimientos de Geografía e Historia 
española. Floppy no perdona y te costara 
mucho superarlo. PVP. 1.000 Ptas. 



MAD FOX. Un héroe solitario es lanzado a 
una carrera a vida o muerte por un desierto 
plagado de peligros. Conseguir el combusti- 
ble para sobrevivir es su misión. Diez niveles 
de dificultad. PVP 1.000 pts. 



r 



Nombre y apellidos: 

Dirección: 

Población: 



□ KRYPTON . 

□ UBOOT 

□ QUINIELAS 

□ HARDCOPY ... 

□ LORD WATSON 

□ LOTO 







~l 



•••• • • CP Prov 



Tel.: 



Ptas. 500- 
Ptas. 700,- 
Ptas. 700- 
Ptas. 2.500,- 
Ptas. 1.000,- 
Ptas. 900- 



SNAKE 

EL SECRETO DE LA PIRAMIDE 
STAR RUNNER 




□ 
□ 
□ 

□ TEST DE LISTADOS 

□ MATA MARCIANOS 

□ DEVIL'S CASTLE 



Ptas. 600,- 
Ptas. 700- 
Ptas. 1.000- 
Ptas. 500- 
Ptas. 900- 
Ptas. 900- 



□ 
□ 
□ 
□ 
□ 



FLOPPY 
MADFOX 
VAMPIRO 
SKYHAWK 

TNT 



Ptas. 1.000,- 
Ptas. 1.000- 
Ptas. 800- 
. 1.000,- 
Ptas. 1.000,- 



jjjoobuo uo ouviu ^i uuiwKiu yui v;aua wKtucbbo Ptas. 70,- Remito talón bancario de Ptas 

ATENCION: Los suscriptores tienen un descuento del 10% sobre el precio de cada cassette. 

IMPORTANTE: Indicar en el sobre MSX CLUB DE CASSETTES. ROCAI BATLLE, 10-12 BAJOS. 08023 BARCELONA 

Para evitar demoras en la entrega es imprescindible indicar nuestro nuevo código postal. 



Transfer, SAj 



NUESTRAS CASSETTES NO SE VENDEN EN QUIOSCOS. LA UNICA FORMA DE ADQUIRIRLAS ES SOLICITANDOLAS 

A NUESTRA REDACCION. ¡NO SE ADMITE CONTRA REEMBOLSO! 



— 



LOS GRAFICOS (II) 



Tras la introducción a los gráfi- 
cos que hicimos en el pasado 
número, entramos ahora de lle- 
no en las instrucciones gráficas 
y su funcionamiento. 



Uno de los puntos por los que el 
MSX destaca frente a sus com- 
petidores es la gran cantidad de 
instrucciones gráficas que existen en el 
estándar, cjue en otros ordenadores se 

Hoy trataremos de varias de estas 
instrucciones, en particular, las que 
nos permiten realizar dibujos estáticos 
en la pantalla de nuestro ordenador. 

Aunque en todos los ejemplos utili- 
zaremos SCREEN 2 queremos avisaros 
desde el primer momento de que todas 
las instrucciones que comentaremos 
funcionarán también de igual forma en 
SCREEN 3, y en SCREENs superiores 
si disponéis de un ordenador de la se- 
gunda generación. 

PSET 

Aunque ya hablamos suficiente so- 
bre esta instrucción en el pasado nú- 
mero, daremos un breve repaso de su 
funcionamiento. En todo este número 
daremos por asumidos los conceptos 
de coordenadas (X,Y), por lo que os 
remitimos a nuestro anterior número si 
tenéis alguna duda al respecto. 

La instrucción PSET nos permite di- 
bujar un punto en cualquier posición 
(X,Y) de la pantalla con cualquier co- 
lor que deseemos. Para ello sólo hemos 
de hacer: 
PSET (x,y),c 

sustituyendo "x", "y" y "c" por los res- 
pectivos valores que deseemos dar a las 
coordenadas x e y, y al color del punto 
respectivamente. 

Podemos utilizar en todo momento 
variables en lugar de estos valores y de 
este modo podemos introducir estas 
instrucciones dentro de bucles o de 
cualquier otro tipo de estructura. 

Demos un ejemplo de uso de esta 
instrucción. 
10 SCREEN 2 
20 FORL=lTO 15 
30 FORI=0TO255 
30 PSET(I,45),L 
40 NEXTI 
50 NEXTL 
60 GOTO 60 

Este programa dibujará líneas hori- 




zontales (ya que la coordenada Y per- 
manece constante=45) variando su co- 
lor entre 1 y lf 



LINEAS Y RECTANGULOS 

Pero existe una forma mucho más 
cómoda y rápida de hacer todo tipo de 
líneas gracias a que el BASIC incorpo- 
ra una instrucción específica para el di- 
bujo de éstas. 

Se trata, claro está, de la instrucción 
LINE. Para poder dibujar una línea 
con esta instrucción deberemos indi- 
carle al ordenador las coordenadas de 
los dos puntos entre los que se trazará 
la línea y el color con el que queremos 
que se realice esta línea. Por ejemplo, 
para dibujar una línea verde (color 3) 



entre los puntos (100,100) y (215,170) 
deberíamos hacer: 

LINE(100,100)-(215,170),3 
En general, la estructura a seguir 
para utilizar la instrucción LINE es la 
siguiente: 

LINE (xl,yl)-(x2,y2),C 
donde xl e yl deben ser sustituidos 
por las coordenadas (x,y) del primer 
extremo de la recta. X2 e y2, ele igual 
modo, deben ser sustituidos por las 
coordenadas del segundo extremo de 
la recta, y C por el código del color de- 
seado. 

Pero la utilidad de la instrucción 
LINE no se acaba aquí. Con ella es 
también posible la realización de rec- 
tángulos con lados paralelos a los ejes 
XeY. 
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Para realizar un rectángulo con 
LINE sólo hemos de indicarle al orde- 
nador las coordenadas de dos puntos. 
El se encargará de dibujar el rectángulo 
de lados horizontales y verticales que 
tenga dos vértices opuestos en los pun- 
tos indicados. El modo de indicarle al 
ordenador que realice un rectángulo es 
el siguiente: 

LINE (xl,yl)-(x2,y2),c,B 

¡Atención!, la B que termina la ins- 





trucción LINE no debe ser nunca sus- 
tituida por nada, es la abreviatura del 
inglés BOX (caja) e indica al ordena- 
dor que se debe realizar un rectángulo. 
Repetimos: B no es ninguna variable y 
siempre se debe escribir lo mismo, 
"B". Veamos un ejemplo: 

LINE(100,100)-(215,170),3,B 

Por último, la instrucción LINE 
también nos permite dibujar rectángu- 
los rellenos, es decir, con toda su su- 
perficie coloreada con el color especifi- 

Para especificar esta instrucción de- 
beremos hacer: 

LINE (xl,yl)-(x2,y2),c,BF • 
donde BF vuelve a ser una abreviatura, 
esta vez de BOX FILL (caja y rellena). 



ANGULOS EN RADIANES 



Todo el mundo sabe lo que es un 
ángulo, y también medirlos en 
grados; pero tal vez no todos se- 
pan cómo se miden los ángulos en ra- 
dianes. Vamos a realizar una breve ex- 
posición de este sistema de medida de 
ángulos. 

Si hablamos en grados, una circunfe- 
rencia tiene 360 grados. A partir de 
aquí podemos deducir que media cir- 
cunferencia tendrá 180, y que un cuar- 
to de ésta tendrá 90 grados. 

En radianes ocurre exactamente lo 
mismo. Para simplificar un gran núme- 
ro de operaciones, tanto matemáticos 
como físicos se han puesto de acuerdo 
en utilizar el radián. Un radián es el án- 
gulo que recorre el radio si lo situamos 
sobre la circunferencia (ver figura 1). 
Como en toda la circunferencia hay 2* 
PI veces el radio, se dirá que en una cir- 
cunferencia hay 2*PI radianes. De este 
modo, media circunferencia medirá PI 
radianes, y un cuarto PI/2 radianes. 

Los ordenadores MSX trabajan en 
radianes. Todas las operaciones trigo- 
nométricas -SIN, COS, etc.- se expre- 
san en radianes, así como los ángulos 
para la realización de arcos. 

En todos los casos, los ángulos se mi- 
den a partir de la semirrecta horizontal 
que corresponde al lado positivo del 
eje X y en sentido inverso al de las agu- 
jas del reloj. Quedará más claro si se 
consulta la figura 2. 

Los ángulos siempre han de ser posi- 
tivos, y deben estar comprendidos en- 
tre y 2*PI (6.28). 

Si sabéis el valor del ángulo en gra- 
dos resulta muy fácil pasarlo a radia- 
No debe ser sustituida. Damos tam- 
bién un ejemplo: 

LINE(100,100)-(215,170),3,BF 

CIRCULOS, ARCOS Y 
OTROS 

Tras ver cómo podemos realizar lí- 
neas en nuestro MSX pasemos a ver 
cómo realizar círculos con estos orde- 
nadores. 

El BASIC de los MSX cuenta con 
una instrucción específica para esta ta- 
rea, como cuenta con LINE para la rea- 
lización de líneas. 

Para poder realizar un círculo nece- 
sitamos indicarle al ordenador 3 cosas: 
las coordenadas (x,y) del punto corres- 





ü 

k \ 




K i 1 




Ttrad 


i .V 




Orad 

- r 


FIGURA 2 

nes. Para ello deberéis utilizar la fór- 
mula: 

RAD = GRA*PI/180 
donde GRA debe ser sustituido por la 
cantidad en grados que conocemos y 
PI por su valor, es decir, 
3.141592654... 



pondiente al centro del círculo, el radio 
(R) del círculo y el color (C) con el cual 
queremos que aparezca dibujado en la 
pantalla. Veamos un ejemplo: 

CIRCLE(128,96),50,15 
dibuja un círculo con centro en el pun- 
to (128,96), de radio 50 y con color 
blanco (15). En general, la instrucción 
CIRCLE debe ser utilizada de la si- 
guiente forma: 

CIRCLE (x,y),R,C 

Al igual que la instrucción LINE nos 
permitía realizar otros dibujos, además 
de líneas, la instrucción CIRCLE nos 
permite realizar arcos^u elipses. 

Para poder realizar arcos se deben 
tener claros dos conceptos matemáti- 
cos de gran importancia, los ángulos y 
el modo de expresarlos en radianes. 
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EL BASIC paso a paso^ 



Para poder indicarle al ordenador 
aue debe realizar un arco hemos de 
darle la siguiente información: coorde- 
nadas def punto central (x,y,), radio 
(R) del círculo que contiene a ese arco, 
color del mismo (C), y los ángulos de 
inicio y final del arco en cuestión. Estos 
dos últimos datos deben expresarse en 
radianes. Si no conocéis la forma de ex- 
presar un ángulo en radianes os reco- 
mendamos que leáis detenidamente el 
recuadro que incluimos y que explica 
cómo expresar en radianes cualquier 
ángulo que deseemos. 

La forma de hacer que el ordenador 
dibuje un arco es la siguiente: 

CIRCLE (x,y),R,C,al,a2 
donde al y a2 son los ángulos de inicio 
y final respectivamente. Es muy impor- 
tante el orden de estos dos datos, ya 
que el arco se dibujará desde el ángulo 
"al" hasta el "a2" siguiendo el sentido 
antihorario, es decir, contrario a las 
agujas del reloj. 

Podemos hacer también que se di- 
bujen los radios que unen el centro de 
la circunferencia que contiene el arco 




EJERCICIOS 



En esta ocasión os propondremos 
un único ejercicio, consistente 
en realizar un dibujo lo más pa- 
recido posible a la realidad, de algún 
objeto cercano a vuestro ordenador (o 
bien vuestro propio ordenador). Po- 
déis utilizar para ello todas las instruc- 
ciones gráficas explicadas hasta ahora. 

SOLUCIONES A LOS 
EJERCICIOS DEL MES 
PASADO 

El primer ejercicio de los propuestos 
en nuestro pasado número es tan gene- 
ral que difícilmente podríamos dar una 
solución típica. En él se proponía que 
realizárais cualquier dibujo utilizando 
únicamente la instrucción PSET. 

Suponemos que no habréis encon- 
trado excesivas dificultades en este 
punto, así que pasamos al siguiente 
ejercicio. 

En el segundo ejercicio os pedíamos 
que Uenárais to4a la pantalla con pun- 
tos de color verde. Una posible solu- 
ción sería: 
10 



20 COLOR 3 'Verde 

30 FORY=0TOl91 

40FORX=0TO255 

50 PSET (X,Y) 

60NEXTX 

70 NEXTY 

80 GOTO 80 

Si observáis el programa os daréis 
cuenta de que las líneas 40 a 60 única- 
mente realizan una línea horizontal 
(ejemplo que dimos en el pasado nú- 
mero). Basta con repetir esto 192 veces 
cambiando en cada caso el valor de Y 
para tener todas las líneas horizontales 
que caben en una pantalla. Es, en defi- 
nitiva, algo tan sencillo como el progra- 
ma de arriba. 

Por último, para dibujar una X en la 
pantalla lo más grande posible pode- 
mos hacer algo como 
10 SCREEN 2 
20FORI=0TO255 
30X=I 

40 Y= (1/255)* 191 
50 PSET (X,Y) 
60PSET(X,191-Y) 
70NEXTI 
80 GOTO 80 

Esperamos que este programa os re- 
sulte más o menos familiar, ya que otra 
versión similar a ésta se explicó al ha- 
blar de la instrucción LOCATE en la 
resolución de los ejercicios. ¡Hasta el 




con los puntos de inicio o fin del arco. 
Para ello sólo hemos de anteponer un 
signo menos "-" al ángulo correspon- 
diente. Por ejemplo, si quisiéramos que 
apareciese el radio que une el centro 
con el principio del arco haríamos, por 
ejemplo: 

CIRCLE (128,96),50,15, -3.1416,4.25 

Finalmente podemos modificar el 
" ASPECT RATIO" de las circunferen- 
cias o arcos que vayamos a dibujar. Se 
llama "aspect ratio" a la relación exis- 
tente entre ancho y alto. Por ejemplo, 
una elipse el doble de alta que de ancha 
tendría un A.R. de 2/1. 

Os habréis dado cuenta, si habéis te- 
cleado alguno de los ejemplos de que el 
ordenador dibuja las circunferencias li- 
geramente ovaladas (más anchas que 
altas). Esta deformación se produce 

f>orque los puntos utilizados por el te- 
evisor no son perfectamente redon- 
dos. En la mayoría de televisores el 
A.R. que se produce espontáneamente 
es de 3/4. 

Un fenómeno similar ocurre con los 
volcados sobre impresora de los gráfi- 
cos. Ahora bien, en este caso cada mo- 
delo de impresora cuenta con un A.R. 
diferente. 

Para conseguir circunferencias per- 
fectas en nuestro ordenador sólo he- 
mos de indicarle un A.R. que compen- 
se el que se produce normalmente. 
Este A.R. es de 4/3. El aspecto final de 
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la instrucción CIRCLE es el siguiente: 
CIRCLE (x,y),R,C,al,a2,AR 
Por ejemplo, dibujar una circunfe- 
rencia perfectamente redonda sería: 
CIRCLE (128,96),50,15„,4/3 
Una elipse alargada horizontalmente 
sería 

CIRCLE (128,96),50,15,„l/6 
y lo mismo verticalmente sería 
CIRCLE (128,96),50,15„,8/3 

Daos cuenta de que no indicamos los 
ángulos de inicio y final, ya que dibuja- 
mos una circunferencia. ¡No debéis ol- 
vidar las comas! 

Y un último detalle, si modificamos 
el A.R. de una circunferencia o de un 
arco, el radio que indiquemos será 
siempre un 







PINTANDO 



La última instrucción que comenta- 
remos en este número es la instrucción 
PAINT. Gracias a esta instrucción po- 
dremos rellenar con un color todo tipo 
de contornos, por irregulares que estos 
sean. 

Para ello deberemos buscar las coor- 
denadas de un punto (x,y) interior a la 
figura que queremos rellenar. Sólo nos 
queda indicárselo al ordenador. Para 
ello haremos 

PAINT (x,y),C 
que rellena la figura que contenga al 
punto (x,y) con el color C. 

Existe una diferencia de utilización 



de esta instrucción según estemos en 
SCREEN 2 o en SCREEN 3. 

* SCREEN 2: Sólo podemos pintar 
la figura con el color del contorno con 
el cual está dibujada. Cualquier intento 
de rellenar una figura con un color di- 
ferente producirá un desbordamiento. 

* SCREEN 3: El contorno ha de ser 
de un sólo color, pero podemos relle- 
nar la figura con un color diferente al 
del contorno. Para ello hemos de hacer 

PAINT (x,y),cp,cl 
donde "cp" es el color con el que que- 
remos rellenar la figura y "el" el color 
con el cual está dibujada la misma. 

Esperamos que con esto tengáis grá- 
ficos para rato. ¡Hasta el próximo nú- 
mero! 



— 



SENSACIONAL CONCURSO 

"GAMA UHMSX-2" 



A la vista del interés que suscitan entre nuestros lectores, los aparatos de la 
segunda generación, nuestra revista organiza un "concurso relámpago", cuyo 
premio será un MSX-2 SONY HIT BIT F9S. 

El modo de participar en este concurso no puede ser más sencillo: Durante los 
meses de julio, agosto, septiembre y octubre, aparecerán en esta revista las 
letras M, S, X y el número 2 respectivamente. Para poder entrar en el sorteo del 
aparato, deberá remitirse a esta redacción -durante todo el mes de octubre- el 
anagrama MSX2 formado con las letras aparecidas en los sucesivos números. 
El plazo para la recepción de estos programas finalizará el día 2 de noviembre 
de 1 987, y entre todos los recibidos hasta esa fecha sortearemos el fabuloso 
SONY HB-F9S MSX2. 

Nota importante: Sólo se aceptarán las letras originales. 
Las fotocopias serán automáticamente invalidadas. 
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¿Y TU POR QUE NO? 



iPor Antonio Moreno. 



vvIVIv 

PROGRAMAR 
UN VIDEOJUECO 



Sí, tú lector habitual de nuestra 
revista, ¿jamás te has planteado 
el programar por ti mismo un 
juego? Decídete: con paciencia, 
algo de ingenio y después de 
leer este artículo, no te será di- 
fícil alcanzar tu meta. 



Parecerá trivial lo que me dispon- 
go a explicar, pero creo que an- 
tes de analizar el cómo se hace 
un juego, lo lógico es que nos pregun- 
temos por los diferentes tipos de juegos 
para posteriormente analizarlos uno 
por uno. No se puede hacer una des- 
cripción de "los juegos" en general, de- 
bido a la gran diversidad de los mismo. 

Juego es un programa dedicado al 
ocio, a entretener al usuario, en teoría 
tendría que estar dedicado al relax del 
usuario, pero ciertas avalanchas de 
"marcianitos" impiden a menudo este 
cometido. Juegos hay de muchas cla- 
ses: desde los juegos inteligentes, como 
los conversacionales o los juegos de 
mesa (ajedrez, backgammon), hasta los 
juegos de "marcianitos": los famosos 
"arcade games". Analicémoslos: 

JUEGOS INTELIGENTES: en los 
que lo fundamental es la capacidad de 
decisión del jugador y no el tiempo en 
el que lo haga, ni otras cualidades del 
jugador como la rapidez de reflejos, la 
"constancia", la "fuerza de volun- 
tad"... (Sigo haciendo alusión a las pla- 
gas de antes...) 

Aquí estarían clasificados los juegos 
de ajedrez, poker, damas, parchís... así 
como los juegos conversacionales o 
"adventure games" (adventure games 
ya que el primer juego de este tipo tenía 
precisamente este nombre: "Adventu- 
re"). En estos últimos debemos indi : 
carie a nuestro personaje lo que debe 
hacer mediante una serie de órdenes 
del tipo "VE NORTE", "MATA A 
GREMLIN", "COGE LLAVE" o 
"INVENTARIO", de sintaxis muy 
sencilla y que están limitadas a un con- 
junto de verbos y un conjunto de direc- 
ciones, de objetos, de personajes a los 
cuales aplicar esos verbos. Cualquier 
intento de ordenarle a nuestro perso- 
naje que realice otra acción diferente 
de las que puede realizar conllevará el 
fatídico mensaje de "NO SE COMO 
HACER ESO" o el desesperante 
"PERDON?". Esto tiene la ventaja de 
que uno puede dirigirse al ordenador 




FIGURA 1 
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con todo tipo de palabras y expresio- 
nes malsonantes, que este nos respon- 
derá con un "no sé cómo hacer eso"... 

JUEGOS DEPORTIVOS O DE SI- 
MULACION: Aquí nos encontramos 
con los juegos más cotizados última- 
mente. En ellos debemos desde con- 
trolar nuestro bólido a través de un si- 
nuoso circuito de carreras (reproduci- 
do más o menos fielmente de los exis- 
tentes en la realidad), hasta ordenar a 
un jugador de baloncesto que efectúe 
las jugadas más espectaculares con un 
solo toque de joystick. La característica 
fundamental de este tipo de programas 
es que procuran ser lo más fieles a la 
realidad. Tienen en cuenta todo tipo de 
detalles, para que así tengamos la sen- 
sación de que realmente estamos con- 
duciendo un auto, pilotando un avión, 
o jugando a básket. 

A pesar de que no se ajusten a la defi- 
nición de juegos deportivos he situado 
aquí a los simuladores de vuelo, debido 
a que como los deportivos intentan 
imitar al máximo situaciones reales. 

"ARCADE GAMES": Para finalizar 
esta descripción nos encontramos con 
los "marcianitos", "comecocos" y de- 
más elementos de la especie. Aquí no 
prima la capacidad de reacción, sino la 
rapidez con la que ésta se lleva a cabo. 
En ellos el jugador debe enfrentarse a 
enemigos muy tontos, pero en gran nu- 
meró, y que con frecuencia aumentan 
de velocidad con el transcurso de la 
partida, o bien que aumentan de "peli- 
grosidad". Aquí también incluyo a esos 
juegos en los que debemos dirigir a un 
personaje a través de los pasillos de un 
castillo, o a través de un laberinto, 
mientras realiza una serie de acciones 
encadenadas que le llevarán a conse- 



guir terminar el juego. Todo ello mien- 
tras extermina a multitud de seres de 
tod» tipo que intentarán evitar el fin de 
la partida con éxito. . . 

Debido a la extensión que tendría 
este artículo si en él se abordaran con 
detalle cada uno de los tipos de juegos, 
únicamente me centraré en los "adven- 
ture games" y en los "arcade games". 

JUEGOS 

CONVERSACIONALES 
(ADVENTURE GAMES) 

En ellos se distinguen claramente 




■ 4 



6 

Lavabo 



Dormitorio 



Biblioteca 
— I I 



Pasillo ¡ 
3 2 ( 



Pasillo 
1 





Entrada 



1 



i 



8 

Comedor 



7 

Sala de 
Estar 



FIGURA '2) 



FIGURA 2 



dos partes: la parte gráfica y la parte 
"conversacional", es decir, la parte en- 
cargada de dibujar una ilustración que 
nos oriente sobre el juego en cada mo- 
mento del mismo, y la parte que con- 
trole el juego en sí mismo. Los progra- 
mas de este tipo pueden carecer de par- 
te gráfica, pero es imprescindible que 
tengan la parte conversacional. 

Lo más práctico para explicar cómo 
programar un juego de este tipo es in- 
ventarnos uno. El diagrama de flujo de 
un iuego de este tipo, en general, es el 
de la figura 1. 

En nuestro juego van a intervenir 
dos personajes, aparte de nosotros, que 
serán Pedro -el malo- y Vilma -el bue- 
no-. Al encontrarnos con cualquiera 
de ellos y preguntarles se nos formulará 
una adivinanza que si acertamos - nos 
revelará dónde está la llave necesaria 
para abrir la puerta de salida y terminar 
el juego. Es un juego extremadamente 
sencillo, pero que nos servirá perfecta- 
mente como ejemplo. 

El primer paso que hemos de dar es 
diseñar el edificio donde toda la acción 
transcurre. Este es el mostrado en la fi- 
gura dos. 

Después hemos de pensar cuáles van 
a ser los verbos que vayamos a usar y 
qué complementos vayan a llevar, de 
tal forma que cualquier otro verbo, o 
un verbo correcto con los complemen- 
tos erróneos nos dé un error del tipo 
NO SE COMO HACER ESO. Los 
verbos que vamos a utilizar van a ser los 
siguientes (a continuación se detallan 
también los únicos complementos po- 
sibles): 



IR NORTE, SUR, ESTE, OESTE. 
MIRAR 

COGER LLAVE 
PREGUNTAR PEDRO, VILMA. 
ABRIR CON LLAVE. 



Estas son las únicas acciones que po- 
dremos llevar a cabo en nuestro pro- 
grama. 

Vayamos ahora analizando una a 
una cada una de las partes del progra- 
ma: 

INICIALIZACION. Aquí el oro- 
grama debe presentarnos en pantalla la 
primera ilustración sobre el fugar don- 
de estamos. También debe informar- 
nos de las posibles salidas hacia donde 
dirigirnos, de si está Pedro o Vilma... 
Para saber en todo momento las posi- 
bles salidas construiremos una matriz 
con todos los datos: entradas, salidas, 
objetos de la habitación... 

En la inicialización se debe construir 
esta matriz como se 
ción en la figura 3: 
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NO: número 
de orden 
N: norte 
S: sur 
E: este 
O: oeste 
LL: llave 
P: Pedro 
V: Vilma 
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TABLA DE VERBOS: 
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TABLA DE COMPLEMENTOS: 



(4) 



"NORTE" 



'SUR' 



'ESTE' 



"OESTE" 



"PEDRO" 



"VILMA" 



'LLAVE" 




La matriz está construida de la si- 
guiente forma: cada una de las filas es 
una habitación del edificio. En cada 
una de las columnas están indicadas el 
número de habitación, luego las posi- 
bles salidas, luego si en esa habitación 
está la llave, Pedro o Vilma. Por ejem- 
plo: la cocina es la habitación número 
nueve, no tiene salida al norte (x = ca- 
recer de), hacia el sur da a la habitación 
8, no tiene salida al este y hacia el oeste 
da al pasillo 3. Las tres últimas colum- 
nas se establecen arbitrariamente, en la 
marcada como "LL" aparece la posi- 
ción de la llave (en nuestro caso en el 
dormitorio). Esta columna debería ser 
cambiada al azar cada vez que se inicia 
la partida. Arbitrariamente y del mis- 
mo modo he situado a Pedro en la sala 
de estar y a Vilma en la cocina... (espe- 
ro no ser atacado por una horda de fu- 
ribundas feministas...). Aunque esta si- 
tuación podría también ser establecida 
aleatoriamente al empezar la partida 
(esto ya está mejor...) 

Una vez inicializadas todas las varia- 
bles, dibujado en pantalla el primer di- 
bujo, y presentado el primer mensaje, 
la misión de la inicialización ha termi- 
nado. 

EL INTRODUCTOR DE ORDE- 
NES. El problema planteado es el si- 
guiente: hemos de descomponer una 
cadena de dos palabras -rechazaremos 
previamente toda aquella que no cum- 
pla este requisito- en el verbo y el suje- 
to. Para ello el programa debe hacer 
una una lectura de la cadena desde el 
teclado y posteriormente descompo- 
ner la cadena en sujeto y verbo. Para 
ello se busca el espacio del medio de la 
cadena. Lo que auede a la izquierda se 
buscará en la tabla de verbos (figura 
[4]) y si se ha encontrado el verbo se 
procederá a localizar- lo que ha queda- 
do a la derecha en la tabla de comple- 
mentos. Para finalizar se deberá com- 
probar si el complemento se ajusta al 
verbo. 

Esta rutina acabará su misión bifur- 
cando la ejecución del programa a la 
subrutina correspondiente al verbo, 
habiendo previamente fijado el com- 
plemento escogido. 

Por ejemplo: ante la orden "IR 
NORTE" el ordenador distingue entre 
"ir" y "norte" busca ir y lo encuentra, 
busca norte y también lo encuentra. 
Para finalizar busca en la fila de ir para 
verificar si puede ser norte un comple- 
mento de ir. En caso afirmativo dirige 
la ejecución del programa a la subruti- 
na de ir. 
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LA SUBRUTINA "MIRAR" 

Miradas sólo pueden serlo tres co- 
sas: la llave, Pedro y Vilma. Así que lo 
primero que hace esta rutina es com- 
probar si en la habitación en la aue nos 
encontramos están Pedro, la llave o 
Vilma, imprimiendo el mensaje "veo a 
Pedro" o "veo a la llave"... si estuviesen 
allí. Posteriormente vuelve a imprimir 
nuestra situación en el piso y las posi- 
bles salidas. 

LA SUBRUTINA "COGER" 

Sólo se puede Coger la llave, así que 
hay que verificar si la llave está en nues- 
tra habitación y entonces en el lugar co- 
rrespondiente de la matriz poner una 
"n" (el programa sabrá que la llave 
obra en nuestro poder cuando al bus- 
carla en todas las habitaciones no la en- 
cuentre en ninguna). 

LA SUBRUTINA 
"PREGUNTAR" 

Preguntados, sólo pueden ser Pedro 
y Vilma, así que tras la ya habitual com- 
probación para ver quién está, se im- 
prime el resultado y se entra desde el 
teclado la respuesta. Se compara con la 
respuesta correcta y si es correcta y 
quien está es Pedro no pasa nada, pero 
si quien está es Vilma, entonces se bus- 
ca en qué habitación está la llave y se 
imprime "LA LLAVE ESTA EN" jun- 
to al nombre de la habitación. Si la res- 
puesta es errónea y quien está es Pedro 
sencillamente nos aniquila v la partida 
termina. En cambio si es Vilma no pasa 
nada. 

LA SUBRUTINA "ABRIR" 

Para que esta subrutina pueda ser 
ejecutada, es necesario que estemos en 
la habitación 0, en el punto de partida, 
y que tengamos la llave. Tras compro- 
bar esto, si estas condiciones se cum- 
plen... ¡FELICIDADES! ya que has 
terminado el juego. 



LA SUBRUTINA "IR' 



Esta es la subrutina más compleja, ya 
que primero debe comprobar en qué 
habitación estamos (busca en la colum- 
na de los números de habitación la que 
está marcada con una "x"), para poste- 
riormente comprobar si existe salida 
en la dirección en la que queremos ir. Si 
la hay modifica la matriz -nos sitúa en 
la nueva habitación-, nos cambia el di- 
bujo ilustrativo y nos da una descrip- 



ción de la nueva habitación, así como 
las salidas o quién está... 

En caso negativo, la subrutina debe 
avisarnos mediante un error del tipo 
"YO NO PUEDO IR EN ESA DI- 
RECCION", volviendo luego a entrar 
otro comando. 

En resumidas cuentas hemos visto 
cómo programar un programa de 
"aventuras", un programa conversa- 
cional, así que pasamos ahora al segun- 
do bloque: los arcade. 
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JUEGOS DE 
"MARCIANITOS" 
"ARCADE" GAMES 

Aquí la problemática cambia. Pasa- 
mos de unos programas en que los grá- 
ficos tienen una importancia secunda- 
ria, aunque nunca despreciable, a otros 
en que los gráficos son vitales. 

Un arcade será bueno en tanto en 
cuanto tenga unos buenos gráficos y en 
tanto sea adictivo. Para conseguir esto 
segundo una condición indispensable 
es LA RAPIDEZ DE EJECUCION. 
Por eso la inmensa mayoría de los pro- 
gramadores de arcades recurre al códi- 
go máquina como lenguaje de progra- 
mación, pero para los más noveles, o 
para aquellos que las palabras "código 
máquina" aún les pongan los pelos de 
punta o les recuerde a la combinación 
de su caja fuerte de SUIZA... Voy a 
darles unos cuantos consejos sobre la 
rapidez. 
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Para ser rápido hay que: 

- Eliminar las sentencias inútiles como 
los famosos "REM", los cuales no 
hacen nada salvo conseguir que el 
ordenador pierda un tiempo precio- 
so leyéndolos. Deben ser eliminados 
aunque esto nos dificulte la poste- 
rior comprensión del programa. 

- A pesar de que las instrucciones lar- 
gas son más difíciles de estructurar y 
comprender, el ordenador las proce- 
sa más rápidamente. 

- Evita el uso de matrices, que consu- 
men más tiempo del normal en una 
variable vulgar. 

- No nombres a las variables con lar- 
gos nombres que nos evoquen su 
contenido, ya que éstos son más di- 
fíciles de encontrar. 

- Sustituya las sentencias IF-THEM 
por otras de tipo matemático en 
cuanto sea posible. Así: 

10 IF INKEY$="A" 
X=X— 1 

20 IF INKEY$="B" THEN 
X=X+1 

podrían ser sustituidas por: 
10x=x+l*(inkey$='V) 
-l*(inkey$=«b") 
que son más rápidas al ser un cálculo 
matemático. Recordemos que la fun- 
ción inkey$ equivale a un uno si la 
condición se cumple o a un cero, si 
no se cumple. 

- Evite en lo posible los GO TO y los 
GOSUB ya que estas instrucciones 
implican una búsqueda en memoria 
con la consecuente pérdida de tiem- 

- Procure que las subrutinas más úti- 
les se encuentren al principio del 
programa. Procure también que la 
inicialización de las variables, la defi- 
nición de los sprites, las instruccio- 
nes estén al final del programa. 
Cuando hagan taita, no tiene más 
que hacer un GOSUB a la línea don- 
de estén. La razón de ser de esto es 
que al hacer un GOTO como un 
GOSUB el ordenador empieza a 
buscar la línea por el principio del 
progama. Así si las rutinas más usua- 
les están al principio el ordenador las 
encontrará mucho antes, con lo cual 
el programa se verá acelerado. 

- Para terminar, utilice el menor nú- 
mero de variables posible, ya que el 
ordenador tiene que buscar las mis- 
mas en memoria, con el consiguiente 
gasto inútil de tiempo. 



LOS SPRITES 



Como antes he dicho, los programas 




arcade son eminentemente gráficos. 
No sólo eso, sino que en estos progra- 
mas se manejan constantemente gráfi- 
cos en movimiento. El ordenador dis- 
pone de unas estructuras gráficas que 
nos van a permitir el movimiento con 
facilidad: son los sprites. 

Del diseño de los sprites depende, 
en gran manera, el éxito del programa. 
Nosotros vamos a diseñar nuestro pro- 
pio sprite y luego desarrollaremos una 
serie de rutinas que nos permitan el 
control del mismo. El diseño del sprite 
depende de cada uno. 

Se pueden emplear cuatro tamaños 
de sprites: 

- De 8 X 8 puntos SCREEN ,0. 

- De 8x8 puntos 

ampliados a 16 x 16 SCREEN ,1. 

- De 16x 16 puntos SCREEN ,2. 

- De 16x16 puntos 

ampliados a 32 x 32 SCREEN ,3 . 

Comencemos así diseñando un spri- 
te de 8x8 puntos. Para ello en papel 
cuadriculado dibujamos una cuadrícu- 
la de 8x8 caracteres, entonces relle- 
nando los cuadrados, pintamos la figu- 
ra. Aquellos puntos que vayan a ser 
pintados los rellenamos de negro. 
Nuestra cuadrícula puede ser leída 
como ocho filas de ocho cuadraditos 
pintados de blanco o negro. Bien, aho- 
ra le asignaremos a los cuadraditos 
blancos un cero, y a los negros un uno. 



Tendremos ocho números en binario 
que nos representan a las ocho filas del 
sprite, como esto: 

00011000 

00111100 

01111110 

11111111 

00011000 

00011000 

00011000 

00011000 
Pues bien. Ha llegado la hora de co- 
municarle al ordenador como es nues- 
tro sprite. Para ello utilizaremos el co- 
mando SPRITE$ (<entero>=<cade- 
na de caracteres>). 

El entero puede oscilar entre y 255 
cuando el tamaño del sprite es cero o 
uno. En cambio sólo de a 63 cuando 
el tamaño del sprite es de dos o tres. La 
cadena de caracteres debe contener el 
carácter, que genera la función CHR$, 
correspondiente a cada fila del sprite. 
Así: 

SPRITE$(0)= 
CHR$(&B00011000)+ 
CHR$(&B00111100)+ 
CHR$(&B01111110)+ 
CHR$(&B11111111)+ 
CHR$(&B000 11000)+ 
CHR$(&B000 11000)+ 
CHR$(&B000 11000)+ 
CHR$(&B00011000) 



Con ello habríamos definido nuestro 
sprite. Si no deseamos entrar los núme- 
ros en binario deberíamos pasarlos a 
decimal sabiendo que el primer núme- 
ro de la derecha vale 128, el segundo 
64, el tercero 32, el cuarto 16, el quinto 
8, el sexto 4, el séptimo 2 y el octavo 1. 
Entonces deberíamos sumar los valo- 
res de cada número sólo si este es un 
uno, pongamos un ejemplo para acla- 
rar las ideas: si la primera fila era 



el momento: PUT SPRITE A,(X,Y), 
C,N. Donde a es la prioridad del sprite 
(el "plañó de pantalla ■ en el que apare- 
cerá), x,y son las coordenadas en las 
que se situará de la pantalla, c es el co- 
lor con que aparecerá y n es el número 
de sprite que pusimos entre paréntesis 
al definir el sprite, es decir, el número 
del sprite. 

Al hablar de "plano de sprite", en- 
tendemos cada una de las distintas "ca- 
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= 16+8 = 24 decimal 






El número 00011000 en binario 
equivale al 24 en decimal. Análoga- 
mente hallamos los valores del resto: 
00111100 =32+16+8+4 = 60 
01111110 =64+32+16+8+4+2 
= 126 

11111111 = 128+64+32+16+8+ 
4+2+1 =255 

Las cuatro últimas filas son iguales a 
la primera. Los valores de nuestro spri- 
te son 24,60,126,255,24,24,24,24. 

Un programa que los introdujese en 
memoria sería: 



10 SCREEN2,0 
20FORI=lTO8 
30 READ A: S$=S$+CHR$(A) 
40NECTI 
50 SPRITE$(0)=S$ 
60 PUT SPRITE 0,(100,100),15,0 
70 DATA 24,60,126,255,24,24,24,24 
80 GOTO 80 



Para construir un sprite de 16x16 
habría que dividir el mismo en cuatro 
cuadrantes de ocho por ocho y luego al 
introducir Jos números en la < variable 
de cadena> el orden sería el siguiente: 
primero el cuadrante superior izquier- 
do, seguido del cuadrante inferior iz- 
quierdo, luego el superior derecho y 
para finalizar el inferior derecho. 

En la línea 60 del programa observa- 
mos una instrucción desconocida hasta 



pas" en las que se puede situar un spri- 
te. La "capa" más externa es la cero, y 
la más interna es la 32. Tiene mayor 
prioridad la capa menor. Así, si dos 
sprites se superponen se observará por 
encima el que esté situado en una capa 
con mayor prioridad. Sólo se puede si- 
tuar un sprite en cada plano: podremos 
tener hasta 32 sprites a la vez en la pan- 
talla. 

Variando las coordenadas x,y del 
sprite éste se moverá por la pantalla, te- 
niendo la particularidad de que si se sa- 
liese por un lado aparecería de nuevo 
por el otro. La pantalla de sprites es 
continua. 

Para finalizar he de recordar un con- 
cepto muy importante a la hora de ma- 
nejar sprites: No se pueden situar más 
de cuatro en una misma coordenada 
horizontal. Si esto ocurriera sólo se 
mostrarían los cuatro últimos sprites 
en pantalla. 

En fin, si has llegado leyendo hasta 
este punto ¡GRACIAS! (No creo que 
todos lo hayan conseguido), y espero 
que tus conocimientos sobre la progra- 
mación de juegos hayan aumentado. 
Quién sabe, quizá este artículo haya 
sido el principio de un gran futuro pro- 
grama... TU PROPIO PROGRAMA. 
Hasta siempre. 
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En este número os propone- 
mos un concurso especial de ve- 
rano. Para optar a los premios 
que ofrecemos deberéis realizar 
un programa que siga las reglas 
que comentamos a continua- 
ción. El premio os espera. 



LA PROGRAMACION 
ESTRUCTURADA 

La programación es calificada por 
muchos como ciencia, mientras 
que para otros es el arte de hacer 
programas. En ambos casos, la progra- 
mación es la ciencia/ arte consistente en 
hacer "buenos" programas. 

La calidad de un programa es algo 
muy subjetivo en la mayoría de las oca- 
siones. Sin embargo existen unas reglas 
del buen hacer en el arte de la progra- 
mación. Siguiendo estas reglas se reali- 
zan programas que, aparte de funcio- 
nar correctamente, son fácilmente inte- 
ligibles por otros usuarios, es sencillo 
modificarlos y ayudan a que otros 
usuarios mejoren sus conocimientos 



LAS REGLAS DE LA 

PROGRAMACION 

ESTRUCTURADA 

La primera regla de la programación 
estructurada es, evidentemente, es- 
tructurar el programa. Hacer un pro- 
grama no consiste en sentarse delante 
del ordenador y empezar a teclear lí- 
neas como si se tratara de una inspira- 
ción poética. 

En primer lugar se debe tener una 
idea muy clara del programa que de- 
seamos realizar. Saber qué opciones 
debe contemplar, cómo debe funcio- 
nar. En definitiva, tenemos que imagi- 
narnos el programa completo y cómo 
debe funcionar. Sin esta visión de con- 
junto es muy difícil afrontar el proble- 
ma de una forma estructurada y fácil al 
mismo tiempo. 

Una vez tenemos clara la forma que 
debe tener nuestro programa, el si- 
guiente paso consiste en dividirlo en 
bloques independientes. Por ejemplo, 
si estamos realizando un video juego la- 
beríntico (en el que tenemos que reco- 
rrer un intrincado laberinto recogien- 
do objetos y esquivando peligros), po- 
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dríamos dividir el juego en las siguien- 
tes partes. 

* Crear laberinto. 



* Colocar objetos. 

* Dibujar pantalla y cambiar de pan- 
talla. 



* Mover personaje. 

* Mover enemigos. 

Un juego tan complicado como un 
juego de aventuras puede quedar redu- 
cido a este esquema. Cada uno de estos 
puntos es muy fácil de programar por 
separado, que es lo que se debe hacer. 
Incluso podemos incorporar a varios 
juegos la misma rutina de cambio de 
pantalla (es lo que hacen los programa- 
dores profesionales de videojuegos) o 
de movimiento de personajes. 

Para programar cada uno de estos 
puntos hemos de imaginarnos que se 
trata de un programa completo. Por 
ejemplo, «mover personaje» debe ser 
un programa capaz de mover un perso- 
naje por la pantalla, detectando obs- 
táculos que puedan existir en la panta- 
lla. 

Cada uno de estos subprogramas 
debe incluirse en una o varias subruti- 
nas separadas. 

PRESENTACION DE LAS 
SUBRUTINAS 

Cada subrutina debe separarse del 
resto del programa por un conjunto de 
líneas REM en las que se debe especifi- 
car el nombre de la subrutina, su fun- 
ción, las variables que utiliza, y toda la 
información que pueda ser necesaria 
para que cualquier programador en- 
tienda la utilidad y el funcionamiento 
de tal subrutina. 

Las subrutinas deben utilizarse 
siempre que puedan ayudar a la clari- 
dad del programa. El programa 
«ideal» sería aquel en el que sólo exis- 
tieran subrutinas. 

Como esto no es posible, la progra- 
mación estructurada consiste en divi- 
dir el problema lo suficiente para que 
resulte fácilmente inteligible, sin crear 
una subrutina a cada línea de progra- 
ma. Es, en definitiva, vuestro buen jui- 
cio quien debe decidir sobre el número 
de subrutinas. 

PRESENTACION 
GENERAL DEL 
PROGRAMA 

Un programa estructurado debe rea- 
lizarse de la siguiente forma: Las pri- 
meras líneas deben contener unas 
cuantas sentencias REM que informen 
del contenido del programa, su autor, 
etc. 

A continuación deben tomar sus va- 
lores iniciales todas las variables que lo 
necesiten en el programa. Esto sustitu- 
ye a un listado de variables, y es tan útil 
como ese listado, sobre todo si se 
acompaña a cada variable de un breve 



comentario con una línea REM. 

DesrSués de las variables debemos 
incluir el programa principal, con las 
llamadas a subrutinas y todos los pro- 
cesos necesarios. Este programa prin- 
cipal debe ser lo suficientemente claro 
como para que sea fácilmente inteligi- 
ble por cualquier usuario. 

Al final del programa principal es 
conveniente situar las subrutinas utili- 
zadas por el mismo, y sólo al final del 
programa las líneas DATA que sean 
precisas. 

De esta forma se consigue un pro- 
grama elegante y funcional. Y os asegu- 
ramos una cosa. Se tarda menos en na- 
cer un buen programa, estructurado y 
en el que se pueden localizar fácilmen- 
te los errores, que en corregir el amasi- 
jo de líneas resultante de una «inspira- 
ción». 



FINALMENTE 

Todos estos consejos, aderezados 
con muchas líneas REM, pueden per- 
mitiros conseguir el premio de nuestro 
concurso especial de verano. 

¡ Ah!, por último. Las líneas de vues- 
tros programas es recomendable que 
no sean excesivamente largas. Esto fa- 
cilitará que sean fáciles de entender y 
modificables por otros usuarios. 

EXCEPCIONES 

Toda regla tiene su excepción, y la 
estructuración no es algo especial. 

Existen programas en que es muy 
importante la velocidad de ejecución. 
En este caso se suele prescindir de las 
reglas de estructuración para mantener 
la velocidad. Colocar las subrutinas al 
comienzo o hacer líneas muy largas son 
buenos consejos a la hora de conseguir 
una alta velocidad de ejecución. 

Prestad atención a las bases y reglas 
del concurso que os exponemos a con- 
tinuación. 

GRAN CONCURSO DE 
VERANO 

Decididos a hacer que programéis 
cada vez más y mejor, os proponemos 
un concurso de programación para 
este verano, que puede haceros recibir 
unos interesantes premios. 

Pero, ¿en qué consiste el concurso? 

Debéis realizar un programa, si- 
guiendo las normas y directrices que 
expondremos a continuación. Entre 
todos los programas recibidos se esco- 
gerá el que tenga una mejor realiza- 
ción, es decir, el que funcione mejor, 



sea más estructurado. En definitiva, el 
mejor programa. 

El jurado estará compuesto por el 
Departamento de Programación de 
MSX-Club, y sus decisiones serán ina- 
pelables. 

Si, sí, mucho pedir; pero ¿de pre- 
mios qué? 

El programa elegido vencedor entre 
todos los recibidos será publicado en 
nuestra revista y recibirá 15.000 ptas, 1 
lote de nuestros programas, y suscrip- 
ciones en nuestras revistas. Como veis, 
una interesante forma de pasar el vera- 
no. 

¡Explica ya de qué va el juego! 

Tú bien lo has dicho. El programa 
que tenéis que realizar es un juego; 
pero no cualquier juego. 

El juego que debéis hacer es un jue- 
go laberíntico. En este juego debe exis- 
tir un mínimo de 10 pantallas diferen- 
tes, en las que existirán objetos. Estos 
objetos permiten el paso a pantallas su- 
cesivas, así como eliminar a los enemi- 
gos y peligros que acechan por nuestro 
camino. 

No hace falta que los enemigos sean 
móviles. Pueden ser pozos, trampas, 
etc. A vosotros os toca dar rienda suel- 
ta a vuestra imaginación. Pero recor- 
dad, debéis seguir, siempre que sea po- 
sible, todas las reglas de la programa- 
ción estructurada. 

¡Decidido! Me pongo inmediata- 
mente a programar. ¿Hasta cuándo 
tengo para enviaros el programa? 

Tenéis todo el verano para realizar 
vuestros programas. El plazo de recep- 
ción estará abierto hasta el 1 de octubre 
de 1987, y en el número de noviembre 
publicaremos el programa vencedor. 

Yo sigo preguntando. ¿Y si no 
gano? 

Aunque tu programa no sea el me- 
jor, puede ser considerado lo suficien- 
temente bueno como para ser publica- 
do en nuestra revista. Caso de ser pu- 
blicado recibiréis la compensación 
económica correspondiente al nuevo 
concurso de programas MSX-Club. 

¿Y cómo os envío el programa? 

Los programas que deseéis enviar a 
concurso deben remitirse a: 

CONCURSO DE VERANO 

Manhattan Transfer, S.A. 

Roca i BatUe, 10-12, bajos. 

08023 Barcelona (ESPAÑA) 

No olvidéis hacer notar claramente 
en el sobre "PARA EL CONCURSO 
DE VERANO". 

Los programas deben estar graba- 
dos en cinta de cassette o en disco de 3 
1/2 pulgadas. En este último caso el so- 
porte os será retornado, tanto si el pro- 
grama es aceptado como en caso de no 
serlo. 
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MSX por dentro 



iRonald Van Ginkel M 



LA FUNCION 
DRAW 



Muchas veces hemos nombrado 
a la instrucción gráfica DRAW, 
pero como parece que no todos 
los lectores tienen clara su fun- 
ción, vamos a explicar el funcio- 
namiento de esta instrucción 
gráfica que es una de las más po- 
tentes que posee el MSX. 



Para empezar, hay que decir que 
la instrucción DRAW sólo se 
podrá utilizar en SCREEN 2 y 3 
(en los modos de gráficos, vaya). Su 
sintaxis sería: 
DRAW "instrucciones" 
Dichas instrucciones pueden ser: 
A(n): Angle (ángulo), sirve para gi- 
rar el sistema de referencia, n 
puede variar de a 3 (origi- 
nalmente es 0), y su función 
es la de permitir que al decir- 
le que dibuje a la derecha nos 
dibuje arriba, abajo o incluso 
a la izquierda. 
B: Desplaza el punto actual 

pero sin dibujar. 
C(n) : Especifica el color con que se 
quiere dibujar, n puede valer 
de a 15, y cada número co- 
rresponde a un color. Estos 
son: 

0- Transparente; 1- Negro; 
2- Verde; 3- Verde claro; 4- 
Azul; 5- Azul claro; 6- Rojo 
oscuro; 7- Azul celeste; 8- 
Rojo; 9- Rojo claro; 10- 
Amarillo; 11- Amarillo cla- 
ro; 12- Verde oscuro; 13- 
Fucsia (rosa oscuro); 14- 
Gris; 15- Blanco. 
D(n): Indica que el puntero baje n 
puntos. 

E(n): Indica que el puntero suba y 
vaya a la derecha (en diago- 
nal): 

F(n): Indica que el puntero baje y 
vaya a la derecha (en diago- 
nal). 

G(n): Indica que el puntero baje y 
vaya a la izquierda (en diago- 

H(n): Indica que el puntero sube y 
vaya a la izquierda (en diago- 
nal). 

L(n) : Indica que el puntero se des- 
place n puntos a la izquierda. 

M(x,y): Traza una recta desde la po- 
sición del puntero hasta las 
coordenadas x e y. 

M(+x-y):Desplaza el puntero "x" 
puntos (a la derecha si se 
pone un + delante y a la iz- 
quierda si se pone un - de- 




lante) e "y" puntos (hacia 
abajo si se pone un + delante 
y hacia arriba si se pone un - 
delante). 

. N: Dibuja pero sin variar el pun- 

tero. 

R(n) : Indica que el puntero se des- 
place a la derecha n puntos. 

S(n): Varía la escala del dibujo, n 
puede valer de a 255, ini- 
cialmente vale 4. Si no se va- 



ría este valor, al indicarle que 
nos suba un punto, subirá 
uno, pero si le damos el valor 
12, nos subirá 3 puntos en 
vez de uno, si damos el valor 
252, subirá 64 puntos en vez 
de uno. Para saber cuál es la 
escala que adoptará, basta 
dividir n entre 4, con lo que 
nos dará la cantidad de pun- 
tos que se desplazará por 
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cada punto que le digamos 
que se desplace. 
U(n): Indica que el puntero suba n 
puntos. 

Después de indicar los elementos 
que podemos usar, vamos a explicar 
los conceptos que en ellos han apareci- 
do. Para empezar, hay que decir que el 
ordenador simula a un lápiz colocado 
en un papel cuadriculado. El punto 
donde está la punta de este lápiz es lo 
que denominamos puntero. Cuando 
especificamos p.e. "R4", el puntero se 
desplazará cuatro "casillas" a la dere- 
cha, dibujando una línea a su paso. Es- 
tas casillas son los pixels de la pantalla, 
existiendo 256x192 en SCREEN 2. 
Cada pixel tiene una coordenada X y 
otra Y (horizontal -X, vertical-Y). 

Pasamos ahora a describir cada fun- 
ción con un ejemplo: 
10 SCREEN 2 "Pantalla de gráficos". 
20 DRAW"BM100,100U5" Nos sitúa 
en las coordenadas x=100 e 
y= 100, y una vez en este punto, nos 
dibuja 5 puntos hacia arriba. La B 
que hay en el inicio sirve para indi- 
carle que se mueva el puntero a la 
posición 100,100 sin dibujar nada. 
Si la omitiéramos, nos aparecería 
una línea desde el punto 0,0 hasta 
el 100,100. 

30 DRAW"BM50,60R5U10L5D20" 
Desde el pto. x=50 e y=60 nos di- 
buja 5 ptos. a la derecha, 10 ptos. 
hacia arriba, 15 ptos. hacia abajo y 
20 ptos. a la izquierda. 

40 DRAWBM150, 100R20D20L2- 
0U20R10G10F10E10H10" 'Des- 
de el pto. x= 150 e y= 100 nos dibu- 
ja 20 p tos. a la derecha, abajo, iz- 
quierda y arriba (un cuadrado de 
20x20), nos coloca en la mitad de 
la recta superior y nos traza una 
diagonal hacia abajo-izquierda, 
abajo-derecha, arriba-derecha y fi- 
nalmente una arriba-izquierda, 
creando un rombo dentro de un 
cuadrado. 

50 

DRAW"BM50,100M20,160MB0, 
160M50,100M-5- 
10M+10,+OM-5,+ 10" 'Nos di- 
buja una recta desde el pto. 
( 100, 100) al pto. (20, 160), y de este 
al pto. (80,160), y de este vuelve al 
original, creando así un triángulo. 
Después dibuja una recta 5 ptos. a 
la izquierda y 10 ptos. hacia arriba, 
de ahí desplaza 10 ptos. a la dere- 
cha y vuelve a su posición inicial, 
con lo que queda dibujado un pe- 
queño triángulo encima de uno 
grande. 

60 COLOR 10,1, l.CLS 'Borra la pan- 
talla. 



70 DRAW"BM100,100A1R40A0" 
'Gira el sistema de referencia , 
grados, con lo que la instrucción de 
trazar 40 ptos. a la derecha se trans- 
forma en 40 ptos. hacia arriba. El 
sentido del giro es contra las agujas 
del reloj. 

80 DRAW'BMIOO, 50R20BR20C4- 
R20NU20ND20NL20NE8NF8N 
G8NH8" 'Traza una recta de 20 
ptos. a la derecha, después traza 
otra igual, pero sin dibujarla en 
pantalla (mediante la B), vuelve a 
trazar 20 ptos. a la derecha dibuján- 
dolos en pantalla, y desde el extre- 
mo de esta línea traza 7 líneas sin 
desplazar el puntero (mediante la 
N), 4 diagonales y 1 arriba, 1 abajo 
y 1 a la izquierda, dibujando así una 
estrella de color azul. 
DRAW"BM200, 100S8U IOS 1 - 
2L10S16D10S20R10" 'Variando la 
escala se trazan 4 líneas de distinta 
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Ett EL NUMERO 5 DE 



go de este 



Después de estos ejemplos prácticos 
vamos a explicar el uso cíe bucles en la 
instrucción DRAW. Todos los datos 
que se incluyen dentro del DRAW 
pueden ser especificados mediante una 
variable, pero para ello hay que intro- 
ducir un '='+la variable+';', veamos 
un ejemplo: 
10 COLOR 5,1,1 
20 SCREEN 2 

30 DRAW"BM128,96" 'El puntero se 
puede prefijar en una línea aparte. 
40 FOR 1= 1 TO 192 STEP 8 
50 11=1+2:12=1+4:13=1+6 
60 DRAWR=I;D=I1;L=I2;V=I3" 
70 NEXT 
80 GOTO 80. 

Este corto programa dibujará una 
espiral cuadrangular. El programa se 
limita a dibujar líneas, cada una 2 ptos. 
mayor que la anterior, de esta manera 
se logra un dibujo geométrico como 
esta espiral. 

Con lo aquí explicado ya debéis ser 
capaces de dibujar algo, ¡intentadlo! 
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* Programa 



FROGGER 



MMgPbrJ. Laínez S. M 

Haz que la rana atraviese la 
carretera sin que sea atropella- 
da por el denso tráfico. Un jue- 
go sencillo pero muy divertido y 
un clásico ya en el mundo de los 
videojuegos. 




10 REM **************** 
20 REM * FROGGER * 

30 REM * by * 

40 REM * J. LAINEZ S. * 
50 REM **************** 
60 REM * <c> Lleida * 
70 REM * 19B7 * 

80 REM **************** 
90 REM **FFE (0) =26629** 
100 REM *** INSTRUCCIONES *** 
110 KEY ÜFF : SCREEN 0:WIDTH 40: COLOR 
15,1,1:G0SUB 1230: LOCATE 15,1:PRIN 
T"THE FROG " 

120 PRINT: PRINT" Deves ayudar a la 
rana a llegar al otra lado de 

las pistas. Para hacerlo utiliza 
las teclas de cursor o un _>o 

ystick a cualquier port. Cada vez 
que llegues se te darán 100 punt 

os y se te devolverá al lugar 

de origen. 

130 PRINT: PRINT" Si consigues hace 

r 5 viajes canviaras de nivel y o 

btendras 300 puntos extras, 
•i 

140 LOCATE 11, 18: PRINT "PULSA <SPACE 
>" : PLAYA* 



150 IF STRIG(0) T'HEN 1Ó0 ELSE 150 

160 REM *** INICIALIZACION *** 

170 HI=0: OPEN"GRP: "AS#1 

180 KEY OFF: COLOR 15,2,2: SCREEN 2,2 

,0 

190 DATA 66,66,90,60,60,124,66,66 
200 DATA 0,231,24,56,56,24,231,0 
2 1 DATA 66,66,1 24 , 60 , 60 , 90 , 66 , 66 
220 DATA 0,231,56,60,60,56,231,0 
230 DATA ,0,24,49,92,49,24, 
240 DATA , , ,0,39, 64 ,64,64,64,64, 
39, 0,0,0, 0,0,0, 0,0,0, 116,2,2,2,2,2, 
116,0,0, 0, 0,0 

250 DATA 0, 0, 56, "'0, 129,0,0,0,0,0,0, 
0,0,0,0,0,0, 12,26,31, 172,64,0,0,0,0 

,0,0,0,0,0,0 

260 REM *** LECTURA DATAS *** 
270 RESTORE 190 
280 FOR A=0 TO 4 
290 B*=" " 
300 FOR 1=1 TO 3 
310 READ B: B*=B*+CHR* (B) 
320 NEXT í 

330 SPR I TE* ( A ) =B* : COLOR , , A 
340 NEXT A 
350 RESTORE 240 
360 FOR A=5 TO 6 
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570 B*= M " 



380 FOR 1=1 Tü 32 

390 READ B:B*=B*+CHR*(B> 

400 NEXT I 

410 SPRITE* (A) =B*: COLOR , ,A 

420 NEXT A 

430 REM *** DIBUJO PANTALLA *** 

440 LINE (0,20) -(255, 60) , 14,BF:PI=3 
14159 

450 LINE (0,70) -(255, 110) , 14, BF 
460 LINE(0, 120) -(255, 160) , 14, BF 
470 CIRCLE(20,2> , 15, 4, PI /4, 2*PI : CIR 
CLE(35,2) , 10,4,5*PI/4,2*PI:CIRCLE(4 
5,2) , 15,4,5*PI/-4,3*PI/4:PAINT(35,2> 
,4:CIRCLE(100,2) , 15, 4, PI/4, 7*PI/4: C 
IRCLE(115,2) 5 15,4,5*PI/4,2*PI:CIRCL 
E(130,2) , 15,4,5*PI/4,PI/4:PAINT<130 
,2) ,4:CIRCLE(180,2) ,20,4, , , .5:PAINT 
< 1 80 , 2 > , 4 

480 COLOR 15:PSET( 70) , 1 : PRINTtt 1 



5CORE : 000 



HI: ";HI 



490 PSETQ0, 180) , 1:PRINT#1, "LIVES: 
3 LEVEL: 1" 

500 N=l : SC=0: V«3: NS=0: X= 1 1 7: Y= 1 62: L 
= 1 

510 REM *** LOOP PRINCIPAL *** 
520 SPRITE ON 
530 ON SPRITE GOSUB 940 
540 D»SflCK(gf) OR STICK(l) OR STICK 
(2) 

550 IF D=l THEN Y=Y~~8: NS-0: BEEP 
560 IF D=3 THEN X=X+8: NS=3: BEEP 
570 IF D=5 THEN Y=Y+3: NS=2: BEEP 
580 IF D=7 THEN X = X -8: NS=1 : BEEP 
590 IF X<0 THEN X=0 
600 IF X>247 THEN X=247 
610 IF Y<12 THEN GOSUB 1140 
620 PUT SPRITE 0,(X,Y),4,NS 
630 Q=L/100: G==G+7+Q: R==R+'l6+Q: F==F-7+ 
Q 

640 IF G> 10000 THEN G==0:GOTO 630 
650 IF F> 10000 THEN F^0:GOTO 630 
660 IF R> 10000 THEN R=0:GOTO 630 
670 PUT SPRITE 1 , (252+R, 18) , 1 , 5 
680 PUT SPRITE 2, (0+G, 45) , 1 , 5 
690 PUT SPRITE 3, (200+R, 18) , 1 , 5 
700 PUT SPRITE 4, <25+G,45) , 1,5 
710 PUT SPRITE 5, (150+G,45> , 1,5 
720 PUT SPRITE 6, < 150+R, 18) . 1 , 5 
730 PUT SPRITE 7, (0+F, 30) , 1 , 5 
740 PUT SPRITE 8, ( 100+F, 30) , 1 , 5 
750 PUT SPRITE 9, (200+F, 30) , 1 , 5 
760 PUT SPRITE 10, (252+G, 69) , 1 , 5 
770 PUT SPRITE 1 1 , (200+G , 69 > , 1 , 5 
780 PUT SPRITE 12, ( 150+G, 69) , 1 , 5 
790 PUT SPRITE 1 3, (0+F, 96) , 1 , 5 
800 PUT SPRITE 14, (55+F,96) , 1,5 
810 PUT SPRITE 15, (150+F,96) , 1,5 



820 PUT SPRITE 1 6, (0+G, 1 28) , 1 , 5 
830 PUT SPRITE 17, ( 100+G, 128) , 1 , 5 
840 PUT SPRITE 18, (200+G, 129) , 1 ', 5 
850 IF L=>2 THEN PUT SPRITE 19, (0-G 
, 162) , 11,,4 
860 IF L=>3 THEN PUT SPRITE 20, (255 
+G, 112) ,6,6 

870 IF L=>4 THEN PUT SPRITE 21, (255 
+R, 10) ,4,4 

880 IF L=>6 THEN PUT SPRITE 22, (200 
+G, 112) ,6, 6: PUT SPRITE 23, (100+G, 11 
2), 6,6 

890 IF L=>8 THEN PUT SPRITE 24, (50- 
G, 162) , 11, 4: PUT SPRITE 25, (100-G,16 
2), 11,4 

900 IF L=>10 THEN PUT SPRITE 26, (25 
5+R,62) ,6,6 

910 IF L=>12 THEN PUT SPRITE 27, (20 
0+R,62) ,6,6:PUT SPRITE 28,(100+R,62 
) ,6,6 

920 IF L=>14 THEN PUT SPRITE 29, (20 
0+R, 10) ,4,4:PUT SPRITE 30, (100+R,10 
) ,4,4 

930 GOTO 540 

940 REM *** RANA ATROPELLADA *** 
950 SPRITE OFF: PLAYC* 
960 FOR 1=1 TO 5 
970 FOR J=0 TO 3 
980 FOR K=l TO 15 

1010 V=V-1:PUT SPRITE 0,(0,209) 

1020 IF V— 1 THEN 1060 

1030 LINE (10, 180) -(165, 190) ,2,BF:PS 

ET(10, 180) ,2:PRINT#1, "LIVES: "; V 

1040 X=117:Y=162: X=X+10:PUT SPRITE 

0, (X,Y) ,4,0 

1050 SPRITE ON: RETURN 

1060 REM *** FINAL *** 

1070 SCREEN 

1080 COLOR 15, 1, 1:PLAY E* 

1090 IF SOHI THEN HI=SC 

1100 LOCATE 9, 12:PRINT"¿0TRA PARTID 

A(S/N>?" 

1110 A*=INKEY* 

1120 IF A*="S" OR A*="s" THEN 1B0:P 

LAY A* ELSE IF A$="N" OR A*="n" THE 

N COLOR 15, 4, 4: SCREEN 0,0,1:KEY ON: 

PLAY E$: END 

1130 GOTO 1110 

1140 REM *** PUNTUACION *** 

1150 N=N+1:IF N=5 THEN N=1:L=L+1:SC 

=SC+200:PLAY F*: Z=l 

1160 LINE (170, 180) -(255, 191) ,2,BF:P 
SET(170, 180) ,2:PRINT#1, "LEVEL: ";L 
1170 IF PLAY<1)=-1 THEN 1170 
1180 PLAY D*:SC=SC+100:LINE(10, 170) 
-(170, 178) ,2,BF:PSET(10, 170) ,2:PRIN 
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Programa 



T#l, "SCÜRE: ";SC: X=117: Y=!Ó2:PUT 3PR 
ITE 0, CX, Y) ? 2,NS 

1190 IF 2 THEN IF L==5 OR L=10 OR L« 
15 OR L=20 OR L=25 OR L=30 THEN V=V 
+ 1:LINE(10, 180) -(165, 190) ,2,BFsPSET 
( 1 , 1 80 ) , 2 : PR I NT# 1 , " L I VES : " ; V : PLAYV 
*: Z=0 

1200 IF PLAY<1)= 1 THEN 1200 

1210 RETURN 

1220 REM *** PROGRAMA MUSICAL *** 
1230 A*= " L32G5S9M9000CEFADADCCAPDDE 



EEDGCCC06CFGDDEFFFFDDCG6GADECDEAC05 
CCEGGGGG " 

1 240 V*= " L3205S 1 1 M900CDEFG " 
1 250 E*= " V 1 5L803S 1 4M250FFEEGGB AAEEG 
GFFCEGFEDC" 
1260 C*="o3S14M25CCC" 
1 270 D*= " S9M 1 000O6L 1 6CEGGEC " 
1280 F*="L16S14M2504CDE05CDE04CDE05 

EC 



DE" 

129$ RETURN 




Test de listado. 



TEST DE LISTADOS. Para usar el Test de Listado que publicamos al final de cada programa debe cargarse el programa corres- 
pondiente publicado en nuestro número 7 del mes de noviembre, pág. 28. 
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Por Antonio Sanchís 



DICTADO 
MUSICAL 



Los amantes del solfeo en- 
contrarán en este programa un 
inmejorable ejercicio musical. 
El programa realiza tests de sol- 
feo, e incluso cuenta con un te- 
clado musical para entrar las no- 







1000 ' 

1001 J mtmtmtmtmtj 

1002 ' t t 

1003 ' I DICTADO MUSICAL I 

1004 ' t t 

1005 '■ t Antonio Sanchís * 
!00ó ' t t 

1007 ' tmmmtmtmm 

1008 ' 

1020 C0L0R3, 1, 1:KEY0FF:CLS 

1030 6OSUB1410 

1040 PLAY"T120L24v8 

1050 LINE(2,2)-(253,190),15,B 

1060 FORQ=0TOB0STEF.4:PÜTSPRITE0,(119, 

Q),8,l:NEXT:PLAY"o5c 

1070 F0R«=IT0135STEP. 4: PUTSPRITE! , ÍW, 8 

0>,2,2:NEXT:PLAY*o4g 

1080 FDRE=239TO103STEP-.4:PUTSPRITE2. 1 

E,B0),4,0:NEXT:PLAY"c 

1090 FORR=1TO1270:NEXT 

1100 COLORI ,15,14: CLEAR 

1110 GOSUB1410 

1120 M 

1130 FORN=0TO6.28318STEP.2 
1140 Z=Z+2 

1150 CIRCLE(128,72),Z.0,O,N 
1160 NEXT 

1170 LINE(100,77)-(153,100),1,BF 
1180 PUTSPRITE0, (103,80) , 15: PUTSPRITE1 
, (119,80), 15:PUTSPRITE2, (135.30), 15 
1190 Q=120 

1200 FORH=0TO4:LINE(0,Q)-(255,Q),1 
1210 Q=Q+4:NEXT 

1220 PLAY"L12o3go4dfgbo5dL24 

1230 IFPLAY(1)=0THEN1240ELSE1230 

1240 LINE(100,77)-(153,100),15,BF 

1250 FORE=B0TO120STEP.4:PUTSPRITE0, (10 

3,E),l,0:NEXT:PLAY"a- 

1260 FORF=80TO120STEP.4:PUTSPRITE1, (11 

9,F),l,l:NEXT:PLAY"f 

1270 FOR6=80TO120STEP.4:PUTSPRITE2, (13 

5,G),l,2:NEXT:PLAY-o4b 

1280 0PEN'GRP:"AS1 

1290 FORQ=1TQ1270:NEXT 

1300 DRAH"bil2, 139clu21rd21rcl5rclu21d 




1310 PSET< 17, 128) , 15: PSET ( 16. 128) . 15: P 
REBETÍ20, 120) : PRINTfl , " . - : PRESET í 20, 12 
5) :PRINTtl, \ ':PSET(20, 120) , 1:PRESET(3 
0,121) :PRINTI1, , 2":PRESET(30, 130) :PRIN 
Tll,'4" 

1320 PLAY"T120L16v8","T120L16v7" 

1330 0$= n v7o6cv5co5v7cv5cv7dv5dv8e-e-v 

7e-v6e-v7fR16gR16o4a-R16R16R16o5fR16o4 

gR16R16R16o5e-R16o4fR16R16R16o5dR16o4e 

-R16R16R16R16R16o5co4bo5cdo4bagR16R16R 

16 

1340 T$="R16R16R16R16R16R16v7o5cv6co4v 
7cv6cv7dv6dv8e-R16R16R16fR16dR16R16R16 



3a-R16fR16dR16gR16R16o4vBfe*d 
1350 PLAYO!, T$ 

1360 0$= , v7o6cv5co5v7cv5cv7dv5dv8e-fi-v 

7e-v6e-v7fR16gR16o4a-R16R16R16o5fR16o'4 

gR16R16R16o5e-R16o4fR16R16R16o5dR16o4e 

-R16R16R16R16o5co4dfo5co4bo5ccv7cv6c 

1370 T$='o4cR16R16R16R16R16v7o5cv6co4v 

7cv6cv7dv6dv7e-R16R16R16fR16dR16R16R16 

e-R16cR16R16R16dR16o3bR16R16R16o4cR16o 

3a-R16fR16gR16cR16o2gR16e-R16ccv7cv6c 



1380 PLAYO*. T$ 

1390 CLOSE:FORR=1TO3000:NEXT 
1400 6OTO1510 
1410 SCREEN2, 1 

1420 REH 

REH 

1430 REH Definir Sprites 
REH 

1440 REH 



1 450 FORY*0TQ2: A$=' 1 : F0RX=1T08: READA: A 

$=A$+CHR$(A):NEXTX:SPRITE$(Y)=A«:NEXTY 

1460 DATA 102,102,102,112,219,219,219, 

219,127.255,192,254,127,3.255,254,193, 

227,119,62,28,62,119,99 

1470 RETURN 

1480 CLS 

1490 FORZ=1TO10:PRINT*KEY ";:PRINTUSIN 

G"l#" ; Z ; : PR1NT" , ■ ; CHR$ (34) ; SPACEf (6) ; C 

HR« ( 34) ¡ " +CHR$ ( " : PRINT: NEXT 

1500 END 

1510 GOSUB2210 

1520 CLS:C0L0R12,14,3 

1530 PRINT: PRINT: PRINT: PRINT" , 

HQW , ': PRINT: PRINT' ' — 
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Programa 




m- 



1540 L0CATE3,4:PRINT'| DICTADO MUSIC 
AL I 

1550 LOCATE0.7:PRINT 

1560 PRINT"; 

Y 

1570 PRINT" |";SPACE*(26) ! " i" :PRINT° |" ; 
SPACE$(26) ;" |":PRINT" I a ; SPACE$ (26) I" 
•.PRINT" I " ; SPACE$ ( 26) ; " I": PRINT" l";SPAC 
E$(26>;"| 

1580 PRINT" |";SPACE$(26) I": PRINT" ¡"; 
SPACE*Í26) ; " ! " : PRINT" | " ; SPACE$ (26) ; ' | ■ 
: PRINT" !";SPACE$(26) ; " |":PR.INT a |";SPAC 
E$(26);"!':PRINT"!";SPACEf(26);"| 

1590 PRINT" 1 

[ 

1600 LQCATE2,?:PRINT"Fi = Notas Preli 
minares n :L0CATE2,ll:PRINT'F2 = Codifi 
cador ASC II ":LQCATE2, 
Definición de Nivel 
1610 LQCATE2,15:PRINT"F4 = Redefint. F 
un. Keys ":L0CATE2, 17:PRINT"F5 = Direc 
taiente a Test ":L0CATE2, 19: PF:INT"F6 ■ 
Dictado de Acordes 
1620 FQRK=1T0B: KEY (K) QN:NEXT 
1630 ONKEY6OSUB1650, 1670, 2290, 2590, 742 
0.5850.1510 

1640 IFINKEY*=""THEN1640 
1650 CLS : SCREEN0 : COLOR 1,14 
1660 GOTO1B90 

1670 CLS:SCREEN0:COLOR4,14 

1680 LOCATE10,i:PRINT"CODIFI CADOR ASCI 

1 

1690 L0CATE?,2:PRINT" 



1700 PRINT:?RINT"r 

m ,"j 

171? PRINT" lEsriba la";CHRI(32);CHR$!3 
4) ; -frase" ; CHR$ (34) ; CHR$ (32) : "que dése 
e codifi- 1"; :PF.INT" ¡car. "; 
1720 PRINT'Cada nutero supone uno de 
losIVPRINT'IN lugares que definen la 

anchura del";: PRINT" luna linea: (HIDT 
H N). En tanto no 1°; :PRINT" ¡se le in 
dique otra cosa, el ordena- |";:PRINT" | 
dor asuiirá que el valor de N es i- 1"; 

1730 PRINT" |qual a 37. 

I"; 

1740 PRINT" 1 

W9W 1 

1750 LOCATE0. 14: PRINT" 1234567890123456 
789012345678901234567 

1760 PRIRT" 

WQW 

1770 LOCATE0.15 
1780 LINEINPUTZ$ 



1790 PRINT: PRINT" 

m 

1B00 PRINT".... data";CHR$(32)5 
1810 IFLEN(Z$)>37THEN1830ELSE 
1820 F0RN= 1TGLEN ( Z$) : 6OTO1B40 
1830 F0RN=1T037 

1840 PRINTUSIN6"tll";ASC(MID$(Z$,N,l)) 
;:PRINTCHR*(44); 

1850 REM PRlNTMID$(Z$,N,i);CHR$(32):CH 
R$(32);CHR$(61);CHR$(32);ASC(MD$(Z$,N 
,1)), 
1360 NEXT 

1872 PFINT:PRINT:PRINT 
1880 END 

1890 FQR0=1T037:READH:PRINTCHP$(H! ; 
1900 FQRP= 1 TO40 : NEXTP: NEXTO 
1910 PRINT 

1920 F0RQ=1T0259: READN: PRINTCHRS (N) ; 
1930 FORR=1TO40:NEXTR:NEXTQ 
1940 PRINT 

1950 F0RS=ITQ222:READ0:PRINTCHR$(0); 
1960 FQRT=1TO40:NEXTT:NEXTS 
1970 PRINT 

1980 F0RIMT0148:READP:PRINTCHR$(P); 

1990 FORH=1TO40:NEXTW:NEXTU 

2000 LOCATE 1 1 , 22 : PRINT" Pul se una tecla 

2010 IFINKEY$=°"THEN2010 

2020 DATA 32,32,32,32,32,32,32,32,32.7 

8,79,84,65,83,32.32,80,82,69,76,73,77, 

73,78,65,82,69,83,32,32,32,32,32,32,32 

,32,32 

2030 DATA 45,32,77,105,32,97,103,114,9 
7,100,101,99,105,109,105,101,110,116,1 

II, 32,97,32,69,115,116,101,98,160.110. 
32,70,101,114,108,111,45,32 

2040 DATA 115,105,111,32,112.111,114,3 

2,111,102,114,101,99,101,114,109,101,4 

4,32,100,101,115,100,101,32,108,97,115 

,32,112,160,103,105,110,97,115,32 

2050 DATA 100, 101, 32, 32, 77, 83,B8, 45,69 

,88.84,82,65,44,32,117,110,32,109,130, 

116,111,100,111,44,32,109,117,121,32,9 

9,111,109,111,100,111,32 

2060 DATA 97,108,32,116,105,101,109,11 

2,111,32,113,117,101,32,101,108,101,10 

3, 97, 110, ltt, 101, 44, 32, 100, 101, 32, 101, 

118,105,116,97,114,32,108,97,32 

2070 DATA 101,100,105,99,105,111,110,3 

2,101,110,32,112,97,110,116,97,108,108 

,97,32,100,101,108,32,115,105,103,110, 

III, 32,100,101,32,105,110,45,32 

2080 DATA 116,101,114,114,111,103,97,9 

9,105,111,110,32,32.101,110,32,108,111 

,115,32,99,111,109,97,110,100,111,115, 

32,32,73,78,80,85,84,44,32 

2090 DATA 116,97,110,32,109,111,108,10 



I, 115,116,111,32,111,99,97,115,105,111 
,110,97,108,109,101,110,116,101,46,32, 
32,32,32,32,32,32,32,32,32 

2100 DATA 45,32,77,105,32,97,103,114,9 
7,100,101,99,105,109,105,101,110,116,1 

II, 32,116,97,109,98,105,130,110,32,97, 
108,44,32,112,97,114,97,32 

2110 DATA 109,161,32,100,101,115,99,11 

1,110,111,99,105,100,111,44,32,97,117, 

116,111,114,32,100,101,32,117,110,32,1 

12,114,111,103,114,97,109.97,32 

2120 DATA 100,101,108,32,113,117,101,3 

2,115,111,108,111,32,115,130,32,113,11 

7,101,32,102,117,130,32,112,117,98,108 

,105,99,97,100,111,32,101,110,32 

2130 DATA 83,85,80,69,82,45,74,85,69,7 

1,79,83,32,77,83,88,59,32,100,101,108, 

32,99,117,97,108,32,104,101,32,116,111 

,109,97,100,111,32 

2140 DATA 101,110,32,112,114,130,115,1 

16,97,109,111,32,108,97,115,32,100,105 

,114,101,99,116,114,105,99,101,115,32, 

32,98,160,115,105,99,97,115,32 

2150 DATA 100,101,32,115,117,32,109,11 

1,100,101,108,111,32,100,101,32,116,10 

1,99.108,97,100,111,46,32,32,32,32,32, 

32,32,32,32,32,32,32,32 

2160 DATA 45,32,80,111,114,32,117,108, 

116,105,109,111,44,32,97,103,114,97,10 

0,101.99,101,114,32,97,108,32,97,117,1 

16,111,114,32,100,101,108,32 

2170 DATA 108,105,98,114,111,32,34,77, 

83,88,45,71,114,160,102,105,99,111,115 

,32,121,32,115,111,110,105,100,111,34, 

32,40,68,65,84,65,45,32 

2180 DATA 66,69,67,75,69,82,41,44,32,3 

2,115,117,115,32,118,97,108,105,111,11 

5,111,115,32,99,111,110,115,101,106,11 

1,115,32,121,32,101,45,32 

2190 DATA 106,101,109,112.108,111,115, 

46,32,32,32,32,32,32,32,32,32,32,32,32 

,32,32.32.32.32,32,32,32,32,32,32.32,3 

2,32,32,32,32 

2200 SCREEN1:6OTO1520 

2210 CLS:SCREEN1:C0L0R4,7,5 

2220 L0CATE7,8:PRINT"DICTAD0 MUSICAL 

2230 L0CATE6,9:PRINT" 

2240 L0CATE9,ll:PRINT'escrito por 
2250 L0CATE1, 13:PRINT-Antonio Vte. San 
chis Girbés 

2260 LOCATE0,15:PRINT" 

WQW 

2270 FORZ=1TO2000:NEXT 

2280 BEEP:RETURN 

2290 CLS:C0L0R14. 1,3 

2300 PRINT:PRINT--> Define ud. el nive 
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1 de di-":PRINT"ficultad, S/N ? 
2310 Qf=INKEY$ 

2320 IFQ$=CHR$ ( 83) ORQf =CHRf (115) THEN23 
50 

2330 IFQf =CHRf ( 78) ORQf =CHRf (110) THEN25 
80 

2340 GOTO2310 

2350 BEEP:CLS:COLOR1,14:SCREEN0:LIST33 

50-3490 • 

2360 CLS:COLORt,l,l 

2370 6OTO2580 

2380 FORK= 1 T08 : KEY ( K ) OFF : NEXT 

2390 KEY ( 1 ) ON: ONKEYGOSÜB3290 

2400 PLAVT120L16YT120L16' 

2410 PLAY"o5eco4go5cecfckfcgcgcgcacac 

acgcgcgcfedefdedcdecdedco4baggv7ggo5gg 

Vo3ccv7cco4ccv8o3ddv7ddo4ccv8o3eev7e 

eo4ccv8o3Hv7ffo4ccv8o3eev7eeo4ccv8o3d 

dv7ddbbv8ccv7ccv8o4ccv7ccv8o3bagabgdgb 

9 

2420 PLAY"v'8o4aav7aao5ggo4v8bbv7bbo5gg 

V8ccv7ccggv8o4bbv7bbo5ggv8o4aav7aao5f+ 

f+v8o4ggv7ggv8o5ggv7ggv8fedefdo4ao5dfd 

" , "O4co3go4co3go4co3go4do3go4do3go4do3 

go4eo3go4eo3go4eo3go4do3go4do3go4do3go 

4co3babo4co3abagabgab-agfeddv7ddo4dd 

2430 PLAY"o5gdgdgdadadadv7b-v8dv7b-v8d 

v7b-v8dadadadgfefgefedefdefedco4baav7a 

ao5aa" , "v8o3eev7eeo4ddv8o3f f v7f f o4ddv8 

o3ggv7ggo4ddv8o3ffv7ffo4ddv8o3eev7eeo4 

c+c+vBo3ddv7ddo4v8ddv7ddv8co3babo4co3a 

eao4co3a 

2440 PLAY B v8o4bbv7bbo5aav8ccv7ccaav8dd 
v7ddaavBccv7ccaav8o4bbv?bbo5g+g+", "o4d 
o3ao4do3ao4do3ao4eo3ao4eo3ao4eo3ao4fo3 
ao4fc3ao4fo3ao4eo3ao4eo3ao4eo3ao4dco3b 
o4cdo3b 

2450 PLAY"v8o4aav7aav8o5aav7aaggf+f+gg 
o4ggv8o5ggv7ggffeev8fedefdg+f+ef+g+eag 
♦abagf+edef+d\"o4co3babo4co3ao4d+c+o3 

o3ddo4ddv7ddv8cco3bbo4cco3cco4ccv7ccv8 
o3bbaa 

2460 PLAY"o5ggo4v7ggo5v8ggv7ggfteev8íf 
o4v7ffv8o5ffv7ffeeddv8edcdecf+edef+dgf 
+gagfedcdeco4fív7ffo5ff B ,"bagabgo4c+o3 
babo4c+o3ao4dc*dedco3bagabgo4cco3cco4c 
Cv7ccv8o3b-b-aab-b-o2b-b-o3b-b-v7b-b-a 
aggv8akfaf 

2470 PLAY n v8o4ggv7ggo5ffv8o4aav7aao5H 
v8o4b-b-v7b-b-o5ffv8o4aav7aao5ffv8o4gg 
v7ggo5eev8o4ffv7Hv8o5ífv7ífv8edcd","b 
-fb-fb-fo4co3fo4co3fo4co3ío4do3fo4do3f 
Q4do3fo4co3fo4co3ío4co3fb-agab-gagfgaf 
gagfed 

2480 PLAY"o5eco4go5cecfcfcfcgcgcgcacac 
acgcgcgcfedefdedcdecdedco4babgri6grl6g 
V°3ccv7cco4v8cco3ddv7ddo4v8cco3eev7e 
eo4v8cco3Hv7ffo4vBcco3eev7eeo4v8cco3d 




dv7ddbbv8ccv7ccQ4cco3v8Heeddggo4ffdd 
2490 PLAY"bgrl6grl6go5co4grl6grl6gc5co 
4gr 16gr !6go5f o4gr lógr 16go5fo4gr 16gr I6g 
o5ec4grl6grl6g","c3ggo4Hddo3ggo4eecco 
3ggo4eecco3ggc4ddo3bbggo4ddo3bbggo4eec 
c 

2500 PLAY D o5eo4grl6grl6gc5í+o4gricgrl6 
go5f+o4grl6grl6go5go4brl6brl6by'e3ggo 
4eecco3ggo4e-e-cco3ggo4e-e-cco3ggo4ddo 
3bb 

2510 PLAY"o5go4brl6brl6bo5gcrl6o4grí62 
5cr!6erl6grl6ab-agfedefgb-agadrl6o4frl 
6a n ,"fío4ddo3bbeeo4eecco3ggeeddc*c+eea 
ao4c+c+eeggífddo3aa 

2520 PLAY"rl6o5drl6frl6ga-gíe-dcde-fa- 
gfgcrl6e-rl6crl6o4a-rl6frl6o5drl6c4grl 
6e-rl6o5crl6o4a-rl6frl6do3gbrl6grl6g n , 
'ffddcca2bbo3ddggbbo4dd{fe-e-cco3a-a-f 
fo4ddo3bbe-e-o4cco3a-a-*fddo2bbggo3ífd 
d 

2530 PLAY , bgrl6grt6go4co3grl6grl6go4co 
3gr 1 6gr 1 6go4f o3gr 1 6gr 1 6go4 f o3gr 1 6gr 1 6g 
o4eo3gr 16gr 16go4eo3gr 16gr 16go4f +o3ar 16 
arl6ao4í+o3arl6arl6a","ggo3ffddo2ggo3e 
ecco2ggo3eecco2ggo3ddbbo2ggo3ddbbo2ggo 
3eecco2ggo3eecco2ggo3e-e-cco2ggo3e-e-c 
c 

2540 PLAY'o2gbo3dfa-bo4ce-'+ao5ce-o4bo 
5dfdo4bgfdo3bgbo4dego5co4geco3af+e-ce- 

f+o2go4eco3geco2go3dfgbo4deft*gbo5dV 
rl6rl6rl6rl6rl6rl6rl6rl6rl6rl6rl6rl6o2 
V7ggrl6rl6rl6rl6rl6rl6rl6rl6rl6rl6c3gg 
2550 GOTO2410 

2560 FORZ=7TO0STEP- 1 : Bf=CHRf (118) +STRf 
(Z) : PLAYBf : FORT=1TO200: NEXTT: NEXTZ 
2570 IFPLAY(0)=0THEN3290ELSE2570 
2580 SCREEN0.0.0 



2590 CLS: SCREEN0: C0L0R3, i 

2600 PRINT'Si desea redefinir las ted 

as de fun-":PRINT":ion de acuerda con 

la tabla pulse: R 

2610 PRINT'Si no, pulse: N 

2620 PRINT:PRINT" 

m 

2630 PRINT 

2640 PRINT" Fl"+CHRtí32)+bffi$(it)*eHM 
(32) tCHRI (34) ; 'PLAY^CHRf !34! : "*CHRf (3 
4) 

2650 PRINT" F2"+CHRf(32)*CHF;f'6í)*CHPf 
(32)+CHRf (34) j "KEYOFF"; CHRf '34) : "♦CHRf 
(13) 



2660 PRINT" F3"+CHRf(32:+CHPf ; ál>+CHFf 
(32) +CHRf (34) ; ' KEYON"; CHRf !34 ! : "+CHRf 
(13) 

2670 PRINT" F4 n *CHFf'32)+CHFf;¿l)*CH c $ 

(32!*CHRf(34);" LIST ";CHF,t(34) 

2680 PRINT" F5"+CHRf(32KHRt<61)*CHRf 

(32)+CHRf(34);"RUN ";CHRf(34) 

2690 PRINT" F6"*CHR$Í32) ♦CHR$(ál V+CHRI 

(32) fCHRf (34) : 'csave' ; CHRf (34) : °+CHRf ( 

34) 

2700 PRINT" F7 n *CHR$(32)+CHF:$(fil)*CHP$ 
(32)+CHRf(34);"clcad"*CHRfí34);"*CHF.f( 
34) 

2710 PPINT" F8"+CHR$t32)*CHRf(6U+CHf;l 
í32)+CHRf(34);" chrf ";CHRf (34) - 
2720 PRINT" F9 B +CHRf(32)+CHFf(61)*CHRt 
(32)*CHRf(34);"?ascC;CHRf(34);'+CHFf( 
34) • ■ 

2730 PRINT" Fl0"+CHF.f(6l)+CHRfí32;'*CHF. 
f(34);"lprir,t":CHRt(3a):"^HRf!34) 

2740 LOCATE0,2l:FFINT" 

WQW 

2750 Ft=INKEY$ 

2760 IFFf="N'Wf=VTHEN2790 

2770 IFFf="R"ORFf="r"THEN2800 

2780 GOTO2750 

2790 BEEF:GOTC2310 

2800 GOSUB4740 

2810 CLS:SCREEN0:COLOF;l4,l 

2820 LINEINPUT"- Nombre: ";If 

2830 PPINT: PRINT: BEEP 

2840 LINEINPUT"- Puntos acuidades: "; 

Jf 

2850 PRINT: PRINT: BEEP 

2860 LINEINPUT"- Test n2; »;K$ 

2870 PRINT: PRINT: BEEP 

2880 F0RA=lT04:PRINT:NEXT:PRINT»Co«pru 

ebe que los datos no contienen":PRINT: 

PRINT'errores. Si está ccnfone oulse: 

i ; 

2890 PRINT: PRINT "en caso contrario pul 
se: 0, e intro-" : PRINT: PRINT'duzcal os 
nuevamente. 

2900 LOCATE0,2l:PRINT" 

WQW 
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Programa 



2910 PCKEMFDE1,IHC3 
2920 P0KEIiHFDE2,ttHD2 
2930 P0KE&HFDE3,?iH23 
2940 POKE&HfDE0,iHFl 
2950 L0CATE21, 19 
2960 Y$=INPUT$(1) 
2970 IFV$=CHR$(49)THEN2990 
2°80 IFY$=CHR$(4S)THEN28!0 
29*0 C0LQR5 

3000 FQRA=1TG300:NEXT:FGRB=1TO3:BEEP:F 

ORC=! T C300:NEXTC:NEXTB 

3010 FQRD=lTG4:PRINT:NEXT:PRINT ! 'Por fa 

vor, espere. Sus datos se están" : PRINT 

:PRINT"prccesando. GRACIAS. 




3020 PRINT:PRINT:PRINT" 

MQU 

3030 FCRE=1TO1400:NEXT:BEEP 
3040 CLS: C0L0P3 
3050 REM 

3060 PRINT:PPINT"-Sie*pre antes de una 
pregunta escu- 

3073 PRWT-chafBios ei ":CHF:$(32) jCHRif 
34);"La 440- ; CHP$ (34) ; CHR$ ' 32) ; "como r 
eterencia. 

3080 PRW-Si ud. n redefine el ní\ 
el de di- 

3090 FRINT"ficu!tad, se trabajaré unic 
aiente en 

3100 pe INT'el- ámbito de lo que para e 
1 ortíena- 

3110 PRINT" dor constituye la octava n2 
4 O, y 

3120 PF.INT-las respuestas constarán, 
invaria- 

3130 PRINT"blei»ente, de seis caractere 
s. 

3140 PPINT:PFINT"-Escucha usted el Pr 
eludió n2 3 del 

3150 PRINT"vq1.I de";CHR*(32);CHRÍ<34 
>J*EL CLAVE BIEN TEMPERADO" ;CHR$ (34) ; C 
HR$(44) 

3160 PRINT"de J.S.BACH; lo escucha en 
Do Mayor; 

3170 PRINT-naturalmente en";CHR$(32) ; 

CHRSÍ34) ; "El clave bién tea- 

3180 PRINT"perado";CHR$(34);CHR$(32);" 

le corresponde Do sostenido 

3190 PRINT "Mayor. Usted lo escucha";CH 

R$ (32) ;CHR$(32) ; CHR$ ( 171 ) ; CHR$ (32) ; "to 

no bajo 

3200 PRINT"por la evidente comodidad q 
ue supone 

3210 PPlNT"el programarlo en esa tonal 
i dad, pe- 

3220 PRINTVo, curiosanente, parece qu 
e fué és- 

3230 PRINT" ta la tonalidad original, y 



que po5- 

3240 PRINT-teriormente BACH lo escribi 
o en Do # 

3250 PPINT-para incluirlo en esa coló 
sal obra. # 
3260 PRINT"„ CUANDO 5U5TE COMENZAR PU 
LSE Fl _ 

3270 REM 
3280 6OTO2380 

3290 CLS:CQL0R14,U:PRINT" Ok":PRINT: 
PRINT" Un ffionento por favor ...":PRINT 

¡PRINT" 

3300 FQRY=7TO0STEP-1:B*=CHR$(11B)+STR$ 

(Y) : PLAYBf: FQRZ= 1TO200: NEXT2 : NEXTY 

3310 STQPQN: ONSTOP6OSUB4700 

3320 DIMPLOT(8,2),MT(30) 

3330 CQL0R4, 14, 14 

3340 CLS:IFNC=3THEN4040 

3350 REM variables para Nivel N 

3360 REM 

3370 REM Probablemente necesite 
evaluar nás ordenes de 
las que ahora tiene en 
pantalLa. 

3380 REM 

3390 A=RND(-TIME) 

3400 X=INT(RND(1)»8)+1 

3410 Y=INT(F:ND(1)*8) + 1 

3420 Z=INT!RND(1)*8M 

3430 Q=INT(RND(1)Í8)+1 

3440 W=INT(RND(l)t8)M 

3450 E=INT(PNDfl)í8)+l 

3460 P$="ab-bcc+de-eff+gg+ 

3470 IFQ>2THENM$=MID$(P$,X,2)ELSEMÍ=MI 

D$(P$,X,1) 

3480 IFW>2THENN$=MID$ÍP$,Y,2)E-LSEN$=MI 
DÍ( D $,Y,l) 

3490 IFE>2THEN0$=MID$(P$,Z,2!ELSE0$=MI 
D$(P$,Z,1) 

3500 IFLEFT$(H$, 1)=CHR$(43)0RLEFT$(M$, 
1 ) =CHR$ (45) THENM$=" " : BEEP: 5OTO3400 
3510 IFFIGHT$(J1$,1)=LEFT$(M$,1)THENM$= 
"':BEEP:GOTO3400 

3520 IFLEFT$(N$, 1)=CHR$(43)0RLEFT$(N$, 
1 ) =CHR$ (45) THENN*="": BEEP: EOTG3410 
3530 IFRIGHT$(N$, 1 ) =LEFT$(N$, 1 ) THENM$= 
"":BEEP:6OTO3410 

3540 IFLEFT$(0$,1)=CHR$(43)0RLEFT$(0$, 

1 ) =CHR$ (45) THEN0$=" " : BEEP: GOTC3420 

3550 IFR!GHT*(0*. 1)=LEFT$(0$, 1)THENM$= 

-:BEEP:GOTO3420 

3560 J=VAL(J$):K=VAL(K$) 

3570 PRINT"- Noabre: " ; : PRINTI$: PRINT 

3580 PRINT"- Puntos acumulados: ";J*NN: 

PRINT 

3590 PRINT"- Test n2: "; K+NK; : PRINT" 
";:PRINT"Pregunta n°:";NC+l 



3600 PRINT: PRINT" 

WQW 

3610 IFPLAY(0)=0THEN3620EL5E3610 

3620 PLAY IL o4aa 

3630 FORH=1TO1270:NEXT 

3640 PLAYM$:PLAYN$:PLAYQ$ 

3650 LOCATE20,2:PRINTJ+NN 

3660 LOCATE0.8 

3670 PRINT "Qué notas han sonado ? 

36H0 PRINT" 

3690 LQCATE0,1Ó:PRINT-H : Repite notas 

. Pierde ";CHR$!171> ; " punto. ": PRINT»- 
m 

3700 LOCATE0, 13; PRINT");' : Uso del ted 

ado.":PPINT" 

3710 LOCA T E0.2?:*RINT"L : Respuesta di 
recta: ab-bcc+de-eff + 

3720 LOCATE0,21:PRINT' 

WQW 

3730 T$=INKEY$ 

3740 IFT$="L"ORT$="rTHEN3790 
3750 IFT$="K"CF T $="¡."THEN4850 
3760 IFT$="H"ORT$="h"THEN3730 
3770 GC T 23 7 30 
3780 NR=NR+l:G0TC4275 
3790 POKE!<HFDE0,&HC9 
3800 L0CATE21.8 
3810 !N D UTA$ 

3820 IFA$=M$+N$+O*THEN3830ELSE3880 

3830 CLS;PPINT:PRINT"En efecto, la res 

puesta era: ";A$: PRINT: PRIÍIT" Acumula u 

n punte pesitivo. ":PRINT:PRINT" 

m 

•840 NN=NN+1:EOSUB3970 
3850 S&TG3fifl 

3860 PPINT:PP.INT"Respuestas correcta*! 
"0 

3870 PRINT: PRINT"Scli c; tudes de repetí 
cien: ";NR 

3880 CLS:FPIN T :PRINT"Lo siento. Pierde 
un punto. ":PRINT:PRINT"U5ted respendi 
o: ";A$:PPINT:PRINT"La respuesta corre 
cta era: ";M$+N$+0$ 

3B°0 PPI NT: PRINT" . 



3900 GOSUB3970 

3910 LOCATE 1 4 , 2 1 : PR I NT " Pu 1 se : N 

3920 L0CATE13,22:PRINT n 

3930 G$=IN.KEY$ 

3940 IFG$="N n OPG*=VTHEN3340 
3950 GOTO3930 
3960 SOTO3340 

3970 PRINT:PPINT"- Preguntas fonulada 
s: ";NC+1 

3980 PRINT: PRINT"- Preguntas restante 
s: ";3-(NC+n 

3990 PRINT: PRINT"- Respuestas correcta 
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repe 



s: ";NN 
4000 

ti:ion: ";NR 

«10 PRINT: PRINT" 

WQW 

4020 NC=NC+1 
4030 RETURN 

4040 BEEP:CLS:C0L0R8,1,1:PP!NT 

4050 PRINT" Resultado: ";NN; "sobre" ;NC 

:PRINT:PRINT' 



406? LOCATE!. 20:PRINT"Otrc test S/N ? 

4070 PRINT: PRINT" 

4090 L=7:PLAY"tl20116","tl20116 
4090 PLAY"o5eco4gc5cecfcfcfcgcgcgcacac 
acgcgcgcfedefdedcdecdedco4baggv7qgo5gg 
Vo3ccv7cco4ccv8c3ddv7ddo4ccv8o3eev7e 
eo4ccv8o3ffv7ffo4ccvBc3eev7eeo4ccvBo3d 
dv7ddbbv8ccv7ccv8o4ccv7ccv8o3bagabgdgb 

g 

4100 0$=-INKEY$ 
4110 IFPLAY(0)=0THEN4090 
4120 IFO$="S"ORO$="s'THEN4l60 
4130 IFO$='N"ORO$=VTHEN4200 
41 40 H$=CHR$ (118) +STR$ ! L) : T$=H$: PLAYH* 
.T*:L=L-1:IFL-1=0THENL=0 

4160 NC=0:NK=NK>1:NR=0 
4170 CLS:CDL0R14, 1: PRINT" Qk D : PRINT: PP 
INT" Un aoientc por favor ... "¡PRINT: P 

RINT" 

4180 FORY=7TO03TEP- 1 : E$=CHR$ { 1 18; +STR$ 
( Y) : EÍ=B*: PLAYB*. E*: F0RZ= ITO200: NEXTZ : 
NEW 

4190 GOTO3340 
4200 CLb : COLORI, 11 :KEV0N 
4210 FORY=7TO0STEF-1: B$=CHR$ (118! +3TR$ 
(Y) : E$=P$: PLAYBÍ , E$: FORZ=1TO200: NEXTZ: 
NEXTY 
4220 END 

4230 BEEP:CLS:C0LOR12 
4240 PRINT:PRINT"-Repite pregunta n2"; 
NC+1 : n ; sufre una 

4250 PRINT:PRINT u penalizacion de";CHR$ 
(32) +CHR$(171) +CHR$ (32) ; "punto. 
4260 PRJNT:PRINT"-Preste ahora lás ate 
ncion... 

4270 PRINT:PRINT" 

WQW- 

4280 LQCATEi,17:PRINP- L: Respuesta. 
(ab-bcc+de-eff+gg+) 

4290 LOCATE0,19:PRINT"- H: Ultima repe 
ticion. 

4300 LOCATE0,21:PRINT" 

m 

4310 FORE=ITO1270:NEXT 

4320 PLAY"o4aa 

4330 FORZ=1TO1270:NEXT 

4340 PLAYH$:PLAYN$:PLAYO$ 
4350 Tt=TNirrv« 



4380 GOTO4350 
4390 NN=NN-.5:GOTO4410 
4400 NR=NR+1:GOTO4460 
4410 BEEP 

4420 LOCATE0,12:PRINT" 
u respuesta 
4430 INPUTA* 

4440 BEEP:CLS:C0L0P4, 14,14 

4450 GOTO3820 

«460 BEEP:QLS:C0L0R8, 1, 1 

4470 PRINT" ATENCION ! "-.PRINT" 



4480 PRINT: PRINT: PRINT: PRINT: PRINT"-Re 

pite - por 23 vez - pregunta n5";NC+l; 
■ • 

4*90 PRINT" (sufre una penalizaron de 

0.75 pun-":PRINT"tos) u :PPINT 

4500 PRINT "-Si depués de responder, pu 

Isa cual-":PRINT"quier tecla que no s 

ea [RETURN], ersPRINT'prograca se aut 

odestrirá. 

4510 FRINT: PRINT"-En cuanto a la atenc 
ion... 

4520 LOCATE0,19:PRINT" 

4530 FORE=1TQ1270:NEXT 

4540 PLAY"o4aa 

4550 FQRZ=1TO1270:NEXT 

4560 PLAYH$:PLAYN$: PLAYO! 

4570 NN=NN-.75 

4580 FORS=1TO2400:NEXT:BEEP 

4590 PRINT:PRINT:PF:INT:PRINT" 

Su respuesta "; 

4600 INPUTAt 

4610 FORT=1TO300:NEXT:BEEP 
4620 POKE(WFDA?).iHFl 




4630 CLS:PPINT"Su respuesta definitiva 
fué: ";A$ 

4640 L0CATE12,12:PRINT"Pulse RETURN 
4650 W$=INPUT$(1) 

4660 IFW J=CHR$ ( 13) THEN4670ELSE4700 

4670 POKE (WÍFDA9) , fcHFfl 

4680 BEEP:CLS:C0L0R4.14,14 

4690 6OTO3820 

4700 CLS: C0L0R15, 4, 4: KEYGN 

4710 PRINT:PRINT"Proqra«a autodestruid 

o 

4720 LOCATE0.20 

4730 END: REM -► DEFUSR4: A=USR(0) 
4740 KEY l. H PLAY"+CHR$(34) 
4 7 50 KEY 2,"KEYQFF"*CHP$(13) 
4760 KEY 3." KEY0N n +CHR$ í 13) 
4770 KEY 4," LIST ' 
4780 KEY 5,"RUN - 
4790 KEY 6, u csave"+CHR$(34) 
4800 KEY 7, , cload' l *CHR$(34> 
4810 KEY 8." chr$( 
4820 KEY 9, un asc í B +CHF$(34) 
¿830 KEY 10,"lprir,t"+CHR$í34) 
4840 PETÜPN 

4850 BEEP:CLS:ST0PQFF:EFASEFLQT.M7 
4860 A$="":KEY(1}0FF 
4870 STOPQN: ONSTOP5OSUB5770 
4880 CLS : KEYGFF: COLOR 1,3,14 
4B90 D IHPLGT (8.2! ,HT!30) : RE5TQFE4920 
4°00 FOFI=0TQ29 
4910 READA: ' I ) =A: NEXT 
4920 DATA 24.2¿.2S.28,31,33 
4933 DA'A 3!,36,33,¿0,41.43 
494? DATA 45.47,48.50,52.53 
4950 DATA 55.57.5°,¿0,i2.s¿ 
4=60 DATA 65,67,69,71, 72,-4 
4970 CLS:5CREEN2,3.¿ 
4980 OPEN"GFP:' : AStl 
4990 LINE(8,120!-'24S,176).15.BF 
5000 LINE(í,llí;-;252,rS;.15,B 
5010 FORI=16TO240STEF3 
5020 L!NEíI.120)-(I,17i>,l 
5030 NEXT 
5040 S=13 
5050 F0RI=1T04 
5060 F0RJ=1T06 
5070 FEADN: S-S+N 
5080 LINE(S,120¡-!S+5,15¿i.l.BF 
5090 NEXT J 
5100 RESTORE5120 
5110 NEXTI 

5120 DATA 0,9,15,8,8,16 
5130 LINE(4,64)-¡252,112).1.BF 
5140 FQRI=68TO100STEP16 
5150 LINE':20,I)-(40,I+8).4.B 
51Ó0 NEXT 
5170 RESTORE5240 

5180 LINEí!16,68!-(244,78U2.BF 
5190 F0RI=1T08 
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«10 ir niDttot.l.il.-a- or nlo«(P».l.l» 



Wt* ir C(oSCrn|D«CP..|,i))- 6 «)oBTHCN «5 



Te encuentras en un oscuro 
castillo abandonado, inten- 
tando encontrar una llave 
de oro para romper el he- 
chizo que te impide salir. 
Para lograrlo tienes que ha- 
cer estallar los barriles de 
TNT y esquivar los mons- 
truos y la corriente de lava. 
Un apasionante juego de 
aventura. 



I Nombre y Apellidos: 

Dirección: i 

i Población: C.P | 

Provincia: 

I □ Deseo recibir: 



El importe de mi pedido lo hago efec 
tivo mediante: 

□ Cheque adjunto a nombre de: 
MANHATTAN TRANSFER, S A. 
C/Rocay Batlle, 10- 12, bajos. 
08023 Barcelona 



5200 COLQR15:PRESET(123,70):PPINTtl.'M 

SX Synthetissr 

5210 F0RJ=1T02 

5220 PEADN:PLOT(I,J)=N 

5230 NEXT J : NEXTI 

5240 DATA 0,-2,2,-2,2,0,2,2,0,2,-2,2 
5250 F$=" 

5260 DATA -2,0,-2,-2 
5270 FGR 1= LTQ8 
5280 F$ S F$+CHR$(!<HFF) 
5290 NEXT 

5300 SPRITE*(0)=F$ 
5310 F*='" 
5320 X=105:Y=168 

5330 STR 15 1 ) QN : ONSTRI55Ü51ÍB5440 
5340 KEY C 1 ) ÜM: ONKEY6GSUB5730 
5350 PUT5PR! T E0,(X,Y),B,0 
5360 ! c ST:CK(0>=0THEN5350 
5370 X=X+PLOT(ST!CK(0).l) 
5380 Y=Y+PLÜT(ST!CK(0),2) 
5390 IFX<BTHENX=8 
5400 IFX:^241 T HENX=241 
5410 IFY<119THENY=119 
5420 IFY>1£STHENY=168 
5^30 50T05352 

5440 IFP0INT(X,Y)=14+lTHEN!1=f1T(INT((X- 

8Í/8)) 

5450 IFF0INTíX,Y)=lTHEN?!=1TíINT((X-13) 

im*\ 

5460 FRESETÍ4, 10) : COLORIS: PRINTS1 , " Su 
respuesta es: 

54 7 COLORI ¡PRESET (4, 14) :PRINTSl, n _ 

5480 FLAY"LB;N=H; 

5490 IFM=36THENM=99 

5500 IFM=37THENM=99: GOTG5650 

5510 IFM=38THENM=100 

5520 IFK=39THENH=101:6OTO56B0 

5530 IFH=40THENH=101 

5540 1FH=41THENH=102 

5550 IFH=42THENH=102:6OTO5650 

5560 IFM=43THENH=1#3 

5570 IFH=44THENH=103:GOTO5650 

5580 IFH=45THENH=97 

5590 IFH=46THENM=98:GOTO5680 

5600 IFH=47THENH=9B 

5610 A$=A$*CHR$(M:IFLENIA$)>6THENA$=" 
, :LINE(2,10)-(250,48),3,BF:PRESET(4,10 
):C0L0R15:PRINTI1," Su respuesta es:': 
ELSE 

5620 COLORI : PRESET f A , 14) :PRINTtl, " _ 

5630COLDR15: PRESET í 144, 10) : PRINT*1 , " " 
♦Ai 

5640 6OTO5700 

5650 A$=A$+CHF$ ( H ) +CHRS (43): PRESET ( 1 44 



THENA$= , "':LINE(2,10)-(250,48),3,BF:PRE 
SET(4,10):COLOR!5:PRINTtl," Su respues 
ta es:": ELSE 

5660 C0L0R1:PRESET(4,14):PRINT#1," _ 

L 

5670 GOTO5700 

5680 A$=A$+CHP$(N) *GHR$ ( 45) : PRESET (144 
, 10) ¡C0L0R15: PRINTül, " n +At: IFLENÍA* ) >6 
THENA$=" n :LINE(2,10M250,44),3,BF:PRE 
SET(4,10):PRINTfl," Su respuesta es: 1 : 
ELSE 

5690 COL0Rl:PF:E3ETi4,14):PRINTIl/ ... 

5700 COLOR15:FRESET(4,30):PRINT*1," Cu 

ando esté conforme puise Fl 

5710 CdL'ORl -.PRESET (4, 34) sPRÍHTIlj " 



5720 RETURN 

5730 GLOSE: RESTORE: BTOPOFF 
5740 BEEP:CLS:SCREEN0,0.0 1 
5750 COLOR'4,14,14 

5760 STOPQN:ONSTORGOSUB*700:6üTG:S20 

5770 BEEP: CLS: CCL0R3, 1,1: SCREEN0, , 1 

5730 KEYON: END 

5790 CLS:SCREEN0:COLOR3 

5600 LOCATE10,ll:PRINT"For favor, ESPE 

RE 

5810 L0CATE9,13:PRINT" 

WQW- 

5820 L0CATElt,22:I$=INPüT$'l) 

5E30 IFASC(I$'=13THEN5740 

5840 REH — Dictado de acordes -- . . 

5850 CLS: SCREEN0: KEYON: COLORO, 1 

5860 WIDTH34 

5870 FORN=0TO967 

5880 VPOKEN,ASC("""! 

5390 NEXT:CQLOR10 

5900 P=36 

5910 F0RN=1T024 

5920 A$="L24"+CHR$'.78)+STR$(P) 

5930 LOCATE0,23 

5940 PR I NT : PLAYAS : P=P + 2 : NEX T 

5950 LOCATE0,0:FORZ=1TO34:PRINTCHR$(12 

6);: NEXT 

5960 COLOR5:RESTORE5°90 
5970 F=5:F0RT=1TQ24 
5980 READY 

5990 LOCATEF,10:PRINTCHR$(Y):BEEP:F=F+ 
1:NEXT 

6000 DATA 65.67,79,82,68,69,83,32,83,7 
3,78,32,65,76,84,69,82,65,67.73,79,78, 
69,83 

6010 LQCATE4. 11:PRINT" 



6020 LOCATE? , 20 : PP INT H Pul se una tecla 

6030 L0CATE8,21:PRINT" 

HQW 



6040 lFINKEY$= Hn THEN6030 

6060 BEEP:CIS:LOCATE0,4:PrÍnT''- Las no 
tas de los acordes deben ser":PRINT"es 
critas de agudo a grave. Asi pues,";" 
si usted escuha ";CHR*(34) ; "f a, la, do"; 
CHR$(34) ;CHR*(44) ;CHR$(32) ; "debe res-" 
;"ponder: afc 

6070 PRINT: PRINT"- Recuerde que si ust 
ed no redefine":FR!NT"el nivel de di f i 
cuitad, solo traba-":PRINT n jareBios en 
el ámbito de la octava n94 
6080 LOCATEll,20:FRINT n P:jlse una tecla 

":LOCATE10,21:PRINT" 

6090 IFINKEY$=""THEN6090 

6100 CLS: IFNC=3THEN6760 

6110 ONSTOPGOSUB7390: STOPQN 

6120 A=RND(-TIHE) 

6130 X=INTÍRNDÍ 1) Í8>+1 

6140 Y=INT(RND(1)*8)+1 

6150 Z=INTiRND(l)IB)*l 

6160 P*="cde-f+gab 

6170 H$=HID$(P$,X,2) 

61B0 IFLEFT$(M,1)=CHR$(43)0RLEFT$(M$, 

1) =CHR$ (45) THENM*=CHF$(0) : BEEP; G0TG613 

0:ELSEM$=MIDS(P$,X,1) 

6190 IFX<YORX<ZTHENBEEP:GQTO6120 

6200 N$=f1ID$ ÍP$, Y,2) 

6210 IFLEFTKN$,l>=CHR*(43)0RtEFTf.'N!, 

1 !=CHR$ (45) THENN$=CHR$(0! : BEEP: GQT0614 

0:ELSEN$=IÍlD$íP$,Y,l) 

6220 IFY<ZTHENBEEP:6QTO6120 

6230 0$=MID$(P$,Z,1) 

6240 IFLEFTJ (0$, 1 ) =CHR$ (43) ORLEFT» (0$, 

1)=CHRS(45)THENOÍ=CHR$Í0):BEEP:GOTO615 

0:ELSEO$=I1IDí(P$,Z,l) 

6250 IFÍ1$=N$QPM$=O$THENBEEP;GOTO6120 

6260 IFN$=O*THENBEEP:6OTO6120 

6270 PRINT"- Nombre: ";I$:PRINT 




6280 PRINT"- Puntos acuauladcs: "; J+NN: 
PRINT 

6290 PRINT"- Test n2: "; K+NK; : PRINT" 
";:PRINT"Pregunta n°: D ;NC+l 

6300 PPINT: PFINT" 

WQW 

6310 PLAY'o4aa 

6320 FORÍ1=1TO1270:NEXT 

6330 PLAYH$,N$,0$ 

6340 LOCATE20,2:PRINTJ+NN 

6350 LOCATE0..B 

6360 PRINT "Qué notas han senado ? 

6370 PRINT" 

6380 LOCATE0,18:PR1NT"H : Repite notas 
. Pierde ";CHR$(17D;" punto. ":FRINT"- 

yny 

man 



Respuesta. 




6390 REM 

6400 LOCATE0,20:PRINT"L 
ab-bec+de-ef f +gg+) 
6410 LOCATE0,21:PRINT"- 
m 

6420 T4*ZNKEY$ 

6430-IFT$="L"ORT$="l"THEN6470 

6440 IFT*="H"QRT$="h"THEN6460 

6450 5OTO6420 

6460 NP=NPM:GDTO6890 

6470 POKE&HFDE0,&HC9 

6480 L0CATE21.B: INPUTAÍ 

6«0 LOCATE0.15:PRINT"Su respuesta es" 

; CHR* (32 ) ¡ CHR$ ( 34) ; A$; CHR$ (34) ; GHR$<4¿ 

};CHR$(32);" Ahora pulseRETURN nueva 

■ente. Si pulsa cualquier"; 

6500 PRINT"otra tecla el programa alea 

cenará susdatss, le punteará con un ce 

ro, y ya ";:PRINT"nc funcionará para u 

sted. ":F0RF=ÍT037:PPI^TCHF:$ 

(32);:NEXT 

6510 LOCATE0,:i:PRINT" 

WQW 

6520 LQCATE25,20:PRINTCHP$':200 , :LOCATE 

25,20:B$=INPUT*(1) 

6530 IFASC (B$) =13THEN6540ELSE7390 

6540 IFA$=H$+N$+O$THEN6550ELSE6600 

6550 CLS:C0LQR4,14,14:PRINT:PRINT"En e 

fecto, la respuesta era: " ; A$: PRIKT: PR 

INT"Acu«ula un punto positivo. ":F C INT: 

PRINT" 

MQW-- 

6560 NN=NNM:GOSUB6690 
6570 5OTO6630 

6580 PRINT: PRINT"Pespuestas correctas: 
";NN 

6590 PRINT:PRINT"Solic:tudes de repetí 
cion: ";NR 

6600 CLS:PRINT:PR.INT"Lo siento. Pierde 
un punto. ":PRINT:PRINT"Usted respondí 
o: ";A*:PRINT:PRINT"La respuesta corre 
cta era: ";H$+N$+Q$ 

6610 PRINT-.PRINT" 




La más rápida 
y completa batalla 
espacial 



Nombre y Apellidos: 

Dirección: 

Población: ZZ" c'p" 

Provincia: 

□ Deseo recibir: 


El importe de mi pedido lo hago 
tivo mediante: 

□ Cheque adjunto a nombre de: 
MANHATTAN TEANSFER, S A. 
C/RocayBatlle, 10-12, bajos. 
08023 Barcelona 



Programa 




m 

£620 5OSUB6690 

6630 L0CATE14,21:PRINT'Pulse: N 

6640 L0CATE13,22:PRINT" 

6650 GI=INKEYS. 

6660 IF6V ¿ N"fl*G*=VTHEN6100 

6670 6OTO6650 

6680 BOTQ6100 

6690 PPINT: PRINT"- Preguntas íoriulada 
s: " ; NC+ 1 

6700 PPINT: PPINT"- Peguntas restante 
s: ';3-(NC+l) 

6710 FRIMT: PPIMT"- Respuestas correcta 
s: ";NN 

6720 PRINT:FF:IN T "- ilicitudes de repe 
ticion: ";NR 

6730 rUWTíPRINT" 

m 



6740 NC=NC*1 
¿750 RETURN 

6760 BEEF:CLS:CQL0R6,1,1: C ' C !MT 

6770 FRINT" Resultado: ";NN;"sobre";NC 

:PRINT:PRINT" - 

6780 L0CATE1, 19¡PF:INT"0trc test S/N ? 

6790 PR!NT:PRINT" 

6800 Q$=INKEY$ 

6810 IFO$="S"ORO$="s n THEN6840 
¿820 IFO$="N"ORQ$="n"THEN6870 
6830 GOTO6800 

6840 NC=0:NK=NK+1:NN*0:NR=0 
6850 CLS:C0L0F4,14 
6860 5OTO6100 

6870 CLS:COLOP1,1U1:KEYON 
6880 END 

6690 BEE C ;CLS:CQLCR12 
6900 PRINT:PRINT D -Repit5 pregunta n2»; 
NC+1: sufre una 
6910 PRINT:PRINT"penalizacion 
(32) *CHR$( 171) ♦CHR$(32>; "punte. 
6920 PRINT: PRINT: PRINT'-Preste ahera i 



Test de listado 



— 



as atención... 

6930 PRINT: PRINT" 

WQW 

6940 LOCATE0,17:PRINT-- L: Respuesta. 
(ab.-bcc+de-eff+gg+) 

6950 LOCATE0,19:PRINT"- H: Ultima repe 

ticion. 

6960 LOCATE0,21:PRINT" 

WQW 

6970 FORE=1TO640:NEXT 
6980 PLAY"o4aa 
6950 FORZ=1TO1270:NEXT 
700? -LAYH$,N$.0$ 
7010 TWHKEYI 

7020 IFT$="L"ORT$="1"THEN7050 
7030 IFT$="H"ORT*="h"THEN7060 
7040 GOTO7010 
7050 NN=NN-.5:BOTO7070 
7060 NP=NR*1;S0T07178 
7070 BEE° 

7080 LOCATE0,13:PRINT' S 

u respuesta "; 
7090 IMPUTAS 

7100 LOCATE0,15:PRINT B Su respuesta es" 
; CHR$ (32) ; GtÍRI (34) ¡ Al; CHR$ (34) ; CHRS (46 
)¡CHR$(32!;" Ahora pul seRETURM nueva 
aente. Si pulsa cualquier"; 
7110 PRINT"otra tecla el programa alna 
cenará susdatos. le puntuará con un ce 
ro, y ya ";:PRINT"no funcionará para u 
sted. ":F0RF=1T037:PRINTCHR$ 
(32);:NEXT 

7120 LOCATE0,21:PRINT" 

m 

7130 LOC ATE25 , 20 ¡ PR I NTCHR$ í 200 ) : LOCATE 

25,20!Bt*lNPUTtU) 

7140 IFASC (Bl) =13THEN7150EL3E7390 

7 150 BEE p :CLS:COL0R4,14,14 

7160 GOTO6540 

7170 BEEP: CLS: COLORÓ, 1 ,'l 













7180 PRINT" ATENCION !":PRINT" 

7191 PRINT:PRINT:PRINT: PRINT: PRINT"-Re 
pite - por 23 vez - pregunta n2";NC+l; 



7200 PRINT'ísufre una penalizacion de 

0.75 pun-":PRINT"tos)":PRINT 

7210 PRINT"-Si depués de responder, pu 

Isa cual-":PRINT"quier tecla que no s 

ea [RETURN], el "¡PRINT'prograia se aut 

odestrirá. 

7220 PRINT: PRINT'-En cuanto a la atenc 
ion... 

7230 LOCATE0,19:PRINT" 

WQW 

7240 FORE=1TO640:NEXT 

7250 PLAY"o4aa 

7260 FORZ=1TO1270:NEXT 

7270 PLAYMS,N$,0$ 

7280 NN=NN-.75 

7290 FORS=1TO2400:NEXT:BEEP 

7300 PRINT: PRINT: PRINT: PRINT" 

Su respuesta 

7310 INPUTAi 

7320 PRINT:PRINT:PRINT"Pulse RETURN, c 

ualquier otra tecla':PR4NT"destruiria 

el prograna... "; 

7330 P0KE(&HFBA9),*HF1 

7340 B$=INPUT$(1) 

7350 IFASC(B$)=13THEN7360ELSE7390 

7360 POKE(&HFDA9),?<HF0 

7370 BEEP:CLS:C0L0R4,14,14 

73B0 GOTO6540 

7390 CLS:COL0R15,4,4:KEY0N 

7400 PRINT: PRINT"Programa autodestruid 

o 

7410 END: REM -► DEFUSF:=0:A=USR(0) 
7420 COLORI , 1 , 1 : CLS: SCREEN0: GOTO3310 
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6030 - =4 
1040 - S5 
6050 - 26 
6060 -228 
60^ - 1 
6080 -230 
60=0 -115 
61f0 - 98 
6110 - 25 
6120 -197 
6130 - 21 
6140 - 22 
6150 - 27 
6160 -153 
6170 -106 
6180 - 37 
6190 - 47 
6200 -108 
6210 - 52 
6220 -152 
6230 .109 
6240 - 68 
6250 -145 
6261 -201 
6270 - 18 



6280 
6290 
6300 
6310 

6320 
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- 9 

_- « j 

-241 



- 9 
-241 
■156 
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6350 
6360 
6370 
6380 
6390 
6400 
6410 
6420 
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¿440 
6450 
6460 
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64°0 

6500 
6512 
¿52¡: 
657? 

¿540 
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¿5t«.' 
65"? 
¿53? 
659Í 
6600 
6613 
6620 
6630 
6640 
6650 
6660 
6670 
668* 



6700 

6710 
6720 
6730 
6740 
6750 
6^60 
6770 
6780 
6790 



6810 
6820 
6830 
6840 
6850 
6860 



-208 6870 -207 

-249 6880 -129 

- 54 6890 -171 

- 7 2 ¿«00 -129 
-124 6910 -206 
•111 6920 - 79 
-220 6930 - 54 

- 46 6940 -158 

- 26 6950 -159 
-ir 6960 -222 
-135 6970 -252 

- 6980 - 72 
-116 6" < '0 -137 
-214 7000 -111 

- 83 7010 - 33 
-215 7020 - 29 
-197 7030 - 71 
-196 7 04? - 20 

- 7 7050 -198 
-130 7060 - 33 
-101 7070 -192 
-128 70B0 -163 
-186 7090 -234 
-222 7 1Í0 -128 
-251 2110 -186 

- 3! ^120 -222 
-120 7130 -251 
-165 7-40 -181 

- 5? 7150 - 55 
-150 7160 - 60 
-166 7170 - 35 

- 5i 7180 -116 
-1B7 7190 -270 
-222 7200 -207 
-215 7210 -245 
-195 7220 -241 
-250 7230 -220 

- ?0 7240 -252 

- 77 7250 - 72 
-170 ^ -137 
-130 7270 -111 
-189 7280 -235 
-191 7290 -235 
-211 7300 -153 
-101 7310 -234 
-222 7320 - 68 

- 20 7330 -196 
-142 7340 - 97 
-238 7 350 -136 

- 79 7360 -195 
-152 7370. - 55 

- 86 -80 - 60 

- 78 7390 -209 

- 78 7400 - 67 

- 98 7410 -187 

- 65 7 *20 -255 
-159 

-244 TOTAL: 

-130 81990 
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Programa 



Por Fernando Alba, 




ESPAÑOLA 



1 ' * ?< & # ?< * ?< * & * & *!<-;*?/* & * Sí * $ * & * & * & * 

20 ' *&SEQGRAF I A ESPAÑOLA Sé* 

30 "U< DE &* 

40 ' *&F E R NANO O A L B A?<* 
50 7 M PARA &« . 

60 ''«e* M3X-BLUB ?<* 

7 " -j. % & * & * & # & * & * & * & # & * & * ?< * & * & * ?/ * 
80 * PANTALLA DE PRESENTACION 
90 CÜL0R4 ,3,5 
100 SCREEN2:CLS 

1 10 F SET ( 1 40 ,,171): DRAW " r 1 u 1 r 1 2a 1 r 
3u2r 5f 3e5u3r lu4e5Li2r3u3r3e2r2e5Ú31 1 
d 21 2u.2r i u3e3u 1 e2u4r 2e3h 1 5u2Se 1 01 2e4 
h 21 1 e7r 5u2r 3e2r 1 0u3e2 1 u5h3u3r 2uh 31 3 
g21 !. !..-..215h3d2i7a31 Ílg3Í9u21 10u2gi0h 
i 01 Í0u31 10d31 10u41 10g51 10u.414d41 15u 
4 h513u3h3g51. i u5g51 3d2r 3d31 3g31 5u21 
3d3i 3d313d5 

120 PSET <35, 19) : DRAW"d9e5d2g5d5r 
5d5r2-d.20r ld41 Idl4g4d 5g5d 15r5e5d71 3 
d*r3d25g5d7r 4u2r5t 5r 20-f 1 2d5-f 5r 7d5f 3 
r»7 d5rl5u.l5rl3e5 

130 CPEM"GRP: "FQR OUTPUTAS1 : PSET (8 
5,55) : FRINT#1 , "GEOGRAFIA" : PSET (85, 9 
5) :FRINTttl, "ESPAÑOLA.. " 
140 RAI NT (0,0) ,4 
150 RAI NT (200, 191) .,4 
160 SCREEN0 
170 KEYOPF 
130 CLS 

190 COLORIS, 5, 5 

200 KEY1 , "SOLUCION "+CHR* (13) 

210 TI*==RIGHT*( (STBS (TIME) ) ,2) : FORT 
«0TOVAL (TI*) : X = INT (RMD ( 1 ) *S> +1 : NEXT 
220 KEY1, M S0LUCI0N"+CHR*<13) 
230 DIMA ( 30 ) : DI MPO* ( 30 , S ) : D I MP* ( 30 ) 
240 CLS 

250 COLOR 15,5,5 

260 PRINT" (c) COPYRIGHT FERNANDO A 
LBA DIAZ: " 

270 PRINT" — 



W 

280 F0RT=3T0 1 1 : TT=22-T í L0CATE9 , T 
290 PRINT"G"+CHR* (28) ; "0"+CHR* (28) 5 
,, R"+CHR*(2B) ! "F"+CHR*(28> ; "A"+CHR*( 
23 ) ; " " *ÍHR* (28) ; "S " +CHR$ (23) ; "A"+C 



Este sencillo programa edu- 
cativo pondrá a prueba vuestros 
conocimientos de geografía po- 
lítica española. 




HR* C28) ; ' Cr 1 * CHR*(2S> ¡¡ " A " 
300 L0CATE9,T-1: PRINT" 

" : LOCATE 1 , TT 
310 PRINT" E"+CHR*> (28) ; ,, G"-+€HR$ (28) 5 
"A"+CHR<t(2S> 5 r M"+CHR*<23J 5 " "+CHR*< 
28) ; "E"+CHR*(2S) 5 " P " +CHR* ( 28 ) ; "ñ"+*C 
HR$<23) :; "L" 

320 LOCATE 1 , TT->- 1 : PR I NT " 

" : NEXT 
330 LOCATE0,21 

340 PRINT" PULSA ESPACIO PARA CG 

MENZAR" 

350 FORT=0TO75: K*«INKEY*: IFkW" "THE 
MNEXTELSE400 
360 LOCATE'0,21 
370 PRINT" 



380 FORT-0TO73sK*-INKEY* í IFK*="' , THE 

NNEXTELSE400 

390 GOTQ330 

400 LOCATE0, 21 .-PRINT" 

M 

410 FORT-1 1T03PTEP-1 : TT=22~T: LOCATE 
9,T 

420 PRINT"G"+CHR*(28) ; "O" +-CHR* (28) : 
"R"+CHR* (28) ; "F"+CHR$ (28) ; , "A ,, +CHR$ ( 
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23) ; " "+CHR*<28> ; "S"+CHR* (28) ; "A"+C 
HR* (28) ; "0"+CHR* (28) ; "A" 
430 LDCATE9 „ T+ 1 ¡ PR I NT " 

" ! LOCATE 10 , TT 
440 PRII\IT"E"+CHR$(28) J "G"+CHR* (28) ; 
"A"+CHR*<23> ; " I "+CHR* (28) ¡ " "+CHR*'< 
28) ; "E" h-CHRíÍ (23) ; "P 1 ' +CHR$ ( 28) ; "fí"+C 
HRé<28) j "L" 

450 LOCATE i , TT- 1 s PR I NT " 

" i NEXT 
460 CLS 

470 COLOR 1 5 , i , 1 
480 ' INSTRUCCIONES 

4 ! ^i:í PRINT" f'c) COPYRIGHT FERNAN 

DO ALBA" 

500 PPINTgPPINT" GEOGRAFIA 
ESPAÑOLA-" 

510 PRINT" 



DE ARCHIVOS 



530 F.ORV- 




(V) :READP*(V> :F 
ORT- 1 TOA ( V ) ¡ READROt» ( V , T ) : MEXTT : NEX T 

540 DATA 4.. GALICIA, LA CORUJA , LUGO , O 
RENSE, PONTEVEDRA 

550 DATA 3„ LEON., LEON, ZAMORA.. SAL. AMAN 

; -A 

560 DATA 3, CASTILLA LA V I E J A , 3ANTAN 

DER , PAL EMC I A n BURGOS r VALLADOL I D , LOGR 

OñO , SOR I A , SEGOV I A, AVILA 

570 DATA i, ASTURIAS, OVIEDO 

530 DATA 2, EXTREMADURA, CACERES, BADA 

JOZ. 

590 DATA 3, ANDALUCIA, HUELVA, SEVILLA 
. CORDOBA , JAEN,, GRANADA , ALMER I A , MALAG. 
A, CADIZ 

600 DATA 2, MURCIA, ALBACETE, MURCIA 
610 DATA 3, VALENCIA, ALICANTE, VAL.ENC 
I A, CASTELLON DE LA PLANA 
620 DATA 4, CATALUÑA, BARCELONA, TARR A 
GOMA, LERIDA, GERONA 

hm DATA 3., ARAGON, HUESCA, ZARAGOZA, T 

ERUEL 

640 DATA 5, CASTILLA LA NUEVA, MADRID 
t TOLEDO, GUADALA JARA, CUENCA, CIUDAD R 
EAL 

650 DATA i, NAVARRA, PAMPLONA 

660 DATA 3, PAIS VASCO, BILBAO, SAN SE 

BASTIAN, VITORIA 

670 ' INSTRUCCIONES 

680 LOCATE0, 6 SPRINT" 

":LOCATE0,5 
690 PRINT" DEBES DE DECIRME LA PART 
E DE ESP A-" 

700 PRINT: PRINT" ÍmA DONDE SE ENCUEN 
TRA LA CAPITAL-/" 

710 PRINT: PRINT" QUE YO TE VOY A DE 
CIR. PERO SI NO/" 



Especial para nuevos 
usuarios. 

Para que ningún lector 
quede al margen te propo- 
nemos una nueva sección/ 
concurso. 

¡Participa con tu pe- 
queño programa de gráfi- 
cos, sonido, juego o truco! 

BASES 

1. ° Podrán participar to- 

dos nuestros lectores, 
cualquiera que sea su 
edad. 

2. " Los programas se re- 

mitirán grabados en 
cassettes debidamente 
protegidas dentro de 
su estuche plástico. 

3. " No se admitirán aque- 

llos programas plagia- 
dos o editados por 
otras publicaciones. 

4. " Las mejoras a los pro- 

gramas se considerarán 
una aportación al mis- 
mo y se publicarán en la 
sección Línea Directa. 



5. " MSX CLUB premiará 

aquellos programas 
publicados con 2.000 
pts. 

6. » MSX CLUB se reserva 

el derecho de abonar 
los premios en metáli- 
co o su equivalente en 
software, haciéndolos 
efectivos a los 15 días 
de publicados. 

FALLO Y 
JURADO 

7. ° El Departamento de 

Programación actuará 
como jurado y su fallo 
será inapelable. 

8. ° Los programas remi- 

tidos no se devolve- 
rán, siendo destruidos 
aquellos que no sean 
seleccionados. 




Programa 




720 
TA P 
730 
740 
750 

EXT 
760 
* (A 

(37 
770 
780 
790 

B00 
B10 
820 
830 
840 
850 



PRINT: PRINT" CONOCES LA RESFUE5 
ULSA T Fl ]" 
GOSUB1020 
" PREGUNTAS 

FORT=4TO20: LOCATE0, T: PRINT" 

" : N 

A= I NT ( RND ( 1 > * 1 3 ) •+• 1 : B= I NT < RND < 1 ) 

(A) ) ) +1 : B*=PO$ ( A, B) :C=LEN(B*> : D= 
-C) /2:C$=P$(A) : LOCATED, 5: PRINTB* 



B=INT (RND < 1 ) * (A (A) ) > +1 
PRINT 

INPUT" FORMA PARTE DE:"; PE* 

I FFE*=C*THENGOSUB830 : GOTO750 

I FPE*= " SOLUC I ON " THEN990 

GOSUB370: LPCATE0 „ 7 : GOTO790 

GOSUB880:GOTO750 

FORT=0TO 1000: NEXT 

GOTG750 





860 -ACIERTO O FALLO 

870 FORT=30TO13STEP-1 : LOCATET , 7 : PRI 
NT" " : NEXT : RETURN 

880 FORT=25TO0STEP-.5:LOCATET, 15: FR 

I NT "ACERTADO " : NEXT 

890 LOCATE0, 15: PRINT"CERTADO " 

900 LOCATE0, 15: PRINT" EFvTADO " 

910 LQCATE0, 15: PRINT" RTADO " 

920 LOCATE0, 15:PRINT"T"AD0 

930 LOCATE0, 15:PRINT"AD0 

940 LOCATE0 ,15: PR I NT " DO 

950 LOCATE0, 15 : PRINT" O 

960 LOCATE0, 15;: PRINT" 

970 RETURN 

980 í SOLUC ION 

990 PRINT: LOCATED, 1 1 : PRINTB* 
1000 E==LEN( ("FORMA PARTE DE:")+C*>: 
F= (37-E) /2: LOCATEF, 13: PRINT" FORMA P 
ARTE DE: " ; C* 

1010 FORT--0TO1000: NEXT j GOSUB870: GOS 
UB880:GOTO750 

1020 FORT-0TO5: K*=INKEY*¡ NEXT: LOCAT 
E0„21 

1030 PRINT" PULSA ESPACIO PARA CO 
MENZAR 

1040 FORT=0TQ75:K$=INKEY*: IFK*=""TH 

ENNEXTEL3E1 080 

1050 LOCATE0, 21: PRINT" 

•i 

1 060 FORT-0TO75 : l<*=* I NKEY$ : I FKíí- ,r " TH 
ENNEXTELSE 1080 
1070 GOTO 1020 
1080 LOCATE0, 21: PRINT" 

«i 

1090 RETURN • . 





10 - 58 


170 


-183 


330 


- 57 


490 


-159 


650 


-112 


810 


-172 


970 


-142 


20 - 58 


180 


-159 


340 


-225 


500 


-241 


660 


- 83 


820 


- 85 


980 


- 58 


30 - 58 


190. 


- 95 


350 


-203 


510 


-173 


670 


- 58 


830 


-207 


990 


- 94 


40 - 58 


200 


-173 


360 


- 57 


520 


- 58 


680 


-160 


840 


-115 


1000 


-238 


50 - 58 


210 


- 90 


370 


-213 


530 


-244 


690 


-162 


850 


-135 


1010 


-186 


60 - 58 


220 


-173 


380 


-203 


540 


- 37 


700 


- 20 


860 


- 58 


1020 


-121 


70 - 58 


230 


- 61 


390 


-226 


550 


- 14 


710 


- 62 


870 


- 5 


1030 


-225 


80 - 58 


240 


-159 


400 


- 72 


560 


-140 


720 


-167 


880 


- 82 


1040 


-118 


90 -- 84 


250 


- 95 


410 


-148 


570 


- 63 


730 


-154 


890 


- 68 


1050 


- 72 


100 -177 


260 


- 1 


420 


-241 


580 


-109 


740 


- 58 


900 


- 1 


1060 


-118 


110 -155 


270 


-205 


430 


-131 


590 


-174 


750 


- 69 


910 


-188 


1070 


-150 


120 -241 


280 


-180 


440 


-121 


600 


-237 


760 


-216 


920 


-106 


1080 


- 72 


130 - 88 


290 


-241 


450 


-149 


610 


- 85 


770 


- 10 


930 


- 22 


1090 


-142 


140 -159 


300 


-132 


460 


-159 


620 


-199 


780 


-145 


940 


-213 






150 - 34 


310 


-121 


470 


- 87 


630 


- 8 


790 


-113 


950 


-145 


TOTAL S 


160 -214 


320 


-148 


480 


- 58 


640 




800 


- 17 


960 




13161 
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INVASOR 



Variables: 

Q$yW$ - 

A$ 

R$ 

P 

V 

X 

XleYl - 
X2eY2 - 
X3eY3 - 
C 

N,N1,Z,Z1- 
MyD - 
R 
F$ 



Forman sprites de 16 X 16. 
Forma sprites de 8x8. 
Lee datos. 

Cantidad de puntos conseguidos. 
Número de vidas que te quedan. 
Coordenada del tanque. 
Coordenadas del avión. 
Coordenadas de la bomba del tanque. 
Coordenadas de la bomba del avión. 
Cantidad de combustible. 
- Contadores 

Estado del joystick o del teclado. 

Récord. 

Fin. 



10 
20 
30 
40 
50 
60 
70 
80 
#1 
90 
LÜR 
100 

8 
110 
120 



REM INVASOR 
REM POR 
REM EUTIÜUID 
REM PARA 
REM MSXCLUB 
P=0: GÜSUB 1890 
REM PRESENTACION 
COLOR 7, 1, 1: 



"grp: "AS 



INVASOR" : CO 



PSET (16, 16) :PRINT#1 
10 

PSET ( 80 , 80 ) : PR I NT# 1 , " POR " : COLOR 



PSET (0, 144) : PRINT#1 , "EUTIQUIO" 
PLA Y " T255S 1 0M200AAACCCDDDBBACCE 
FA":FOR 1 = 1 TO 2000: NEXTs SCREEN 2,2 
130 REM DEFINE SPRITES 16*16 
140 FOR A=0 TO 2 
150 Q$="»: w$=»" 

160 FOR'E-I TO 16s READ R$ 

1 m a*=Q$+CHR* ( VAL ( " &B " +L.EFT$ ( R* , 8 ) 

) ) 

+CHR* ( VAL í " m " h-R I GHT* ( R* , 8 



1 80 
) ) ) 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 



NEXT E 

SPRITE* (A) =Q*4-W$ : NEXT A 
REM DEFINE SPRITES 8*8 
FOR A=3. TO 5 : A$=" " 
FOR E=l TO 8 s READ R* 
A*=A*+CHR* ( VAL < "*<B"+R*) ) 
NEXT E 

SPRITE*(A)=A$:NEXT A 
REM DIBUJA EL PAISAJE 
A$="E20F20": COLOR 8 



Manejando el tanque que se 
encuentra en la parte inferior de 
la pantalla, tienes que disparar y 
destruir al avión que vuela so- 
bre las montañas. Destruyelo 
antes de que se te acabe el com- 
bustible o de que sea él quien te 
destruya a ti. 




290 FOR 1=0 TO 160 STEP 40 
300 DRAW"BM=I ; , 100"+ A* 
310 NEXT I 

320 DRAW "BM0 , 100D2R200U2" 
330 PA I NT < 20 , 1 00 ) , 3 

340 LINE(0, 100) -(256, 170) ,4,BF:LINE 
(0, 170)-- (256, 191) , 12, BF: N=RND ( -TIME 
) 

350 FOR 1=1 TO 100 

360 X=RND(1>*256:Y=RND(1)*80 

370 PSET (X, Y) , 15 

380 NEXT 

390 CIRCLE(240, 15) ,8, 14: PAINT (240, 1 
5) , 14 

400 GOSUB 1800 

410 ON INTERVAL=17 GOSUB 1840: INTE 

RVAL ON 

420 ON SPRITE GOSUB 1300:SPRITE ON: 

EOSUJB 1370 

430 REM DA VALORES A LAS VARIABLES 

440 X m 1 25 : X 1 =240 : V=3 : Y2= 1 65 : Y3=54 : N 

=0: Yl=36: C=248 

450 GOSUB 1390 

460 REM BUCLE PRINCIPAL 

470 M=STICK(1)0R STICK (0) : D=STRIG ( 1 

)0R STRIG(0) 

480 IF M=3 THEN X=X+5 ELSE IF M=7 T 
HEN X=X-5 
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Programa 



490 IF X -' 
HEN X-250 
«500 IF X 1 • d 
SE X 1 = X1 -3 
510 IF Y1>1 
520 I F D< >0 



THEN X«5 ELSE IF X>250 T 
THEN X 1=250: Y1*=Y1 + 10 EL 



"5 THEN Y 1=36 
AND NF0 THEN 



n=:l 



530 IF M=l THEN GOSUB 1410 

340 IF XÍ>XG AND XKX+8 AND N1=0 T 

HEN N 1 ~ : !. : BEEF' 

550 IF MI «i THEN GOSUB 1470 
560 FUT BFRITE 0, i X, 175) , 1 , 0: FUT 3F 
RITE 1 , (XI , Yl ) ¡ 10, 1 
GGTO =170 

REM DATAS DÉ SRRTTE3 
REM TANQUE RRORIG 
DATA 1 1000 
DATA 00000001 10000000 
DATA 0000000 1 1 0000000 
DATA 00 1 i 
¿40 DATA 0000001 1 1 1000000 
650 DATA 00000 lililí 00000 
00001 1 1001 1 10000 

0000111111110000 . 

1 1 3 11 í 1 1 1 1 1 1 1 1 
1 1 Lll 1 1 1 1 1 1 1 1 1 



5S0 
590 
600 
610 
620 
630 



660 
670 
680 
690 



DATA 
DATA 
DATA 
DATA 



7m DATA 1111111111111111 
710 DATA 11111 II 1111 111 11 



720 
730 

"^40 



DATA 

DATA 

DATA 
DATA 



01 1001 1 1 1 1 1001 10 

01 10000000000110 

0110000000000110 
01 100000000001 10 



REM AVION ENEMIGO 



770 
"30 
790 
B00 
810 
S20 
830 
S40 
850 
360 
870 
330 
890 
900 
910 



DATA 0000000000001111 

DATA 1 1 1 1 

DATA 0011 10000011 1110 

DATA 0101 1 1111111111 1 

DATA 1 1 1 J. 1 1 1 1 1000001 i 

DATA 000001 1 111111111 

0000000100010000 
000001 1111111101 
000 1 1 1 1 1 1 i 1 1 1 1 1 1 
0000011111111101 


0000000000000000 






DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 

930 REM ESPLÜSION 
94 DATA 0000000000000000 
950 DATA 0001000001000000 
960 DATA 0001000000000000 
970 DATA 0000010000010100 
980 DATA 0100001001001000 
990 DATA 0010000010000000 
1 DATA 1 1 1 



1010 

1020 
1030 
1040 
1050 
1 060 
1 070 
1080 
1090 

1 100 
1 1 1 

1 120 
1 130 
1 140 



DATA 

DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 



0000100100010100 

0001010100101 000 



00001 10100101000 
0001001010010000 
10 10101101100000 
0101010101010000 

00lllllill:l 11100 
0111111111111110 
REM BOMBA DEL TANQUE 
DATA 00010000 
DATA 001 11000 
DATA 00111000 
DATA 00111000 
1150 DATA 00111000 
1160 DATA 00111000 
i DATA 00010000 

REM BOMBA DEL 

DATA 00000000 

01111101 
1111111 
011111 1 



1 190 
1200 
121 
1 220 
1230 
1240 
1250 
1260 
1270 
1230 
1290 
1300 
1310 
1320 



AVION 



DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
REM 



00000000 
00000000 
00000000 

VACIADOR 



DATA 0,0, 0,0 ,0,0 ,0,0 
REM COMPRUEBA CHOQUE 
3RRITE OFF s I NTERVAL OFF 

IF X>X;L~8 AND X *' X :l + 1 6 AND 1 75 > Y 1 - 
THEN GOSUB 1690 
AND X 2í XI +16 AND Y2 
K Y 1+16 " THEN GOSUB 1720 



8 AND175<Yi+16 
1330 IF X2»;i~0 
>Y1-S AND 



Y3>1 

1 A OS 



1340 IF X3>X-a AND X3<X+16 
75-8 AND Y3< 175+16 THEN GOSUB 
'1350 3PRITE ON: I NTERVAL ONr RETURN 
1360 REM PONE PUNTOS 

:¡ 370 L I ME (0,0) - ( 1 00 „ 10) , l.BFs RSET ( 8 
, 1) ;FRI NT# 1 , " PUNTOS ''¡¡R: RETURN 
1380 REM PONE VIDAS 

1 390 L í NE « 1 00 , ) - ( 1 65 , 1 ) , 1 , BF : PSET 
( 1 05 , 1 ) „ 1 : RR I NT# 1 , " V I DAS " ¡¡ V : I F V«0 
THEN GOTO 1520 
RETURN 

REM MUEVE DISPARO DEL TANQUE 
IF Z=0 THEN X2=X+6:Z=1 
RUT SRRITE 3 , ( X2 , Y2 ) f 2 f 3 : Y2=Y2 

IF Y2<23 THEN Y2=165:RUT 5RRIT 
E 3, (256,256) , ,5: N=0: Z=0:RETURN 
1450 RETURN 

1460 REM MUEVE DISPARO DEL AVION 
1470 IF Z1=0 THEN X3=X+6 : Z 1 = 1 : Y3=Y 1 
+ 12 



1400 
1410 
1420 
1430 
-9 

1440 
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1480 PUT SPRITE 4, ( X3, Y3) , 5, 4: Y3=Y3 
+ t 1 

1490 IF Y3M91 THEN Y3=Y1+18: PUTSPR 

ITE 4, (256,256) , \ 5 : N 1 =0 : Z 1 =0 

1500 RETÜRN 

1510 REM FIN 

1520 S CREEN $f F ***' u flt¡l" 

1530 COLOR 7:P3ET(15, 16) , l:PRINT#i, 

F$ 

1540 COLOR 6:PSETU45, 16) , l:RRIMT#i 
,F* 

1 550 COLOR i 2 : PSET ( 80 , 80 ) , 1 : PR I NT# 1 

1 560 COLOR 6 : P3ET ( 15, 1 44 ) , i : PR I NT# 1 
,F* 

1570 COLOR 7s PSET '145. 144) , 1:PRINT# 
1 , F* 

1 580 BEEP : PLAY " T25504CCC05DDD06EEE0 

7FFF08GGG03BBB02AAA" t FOR I«*2 TO 200 

0:NEXT 

1590 SCREEN2 

1600 IF P>R THEN R=F 

1610 PSET (10, 10) , 1:PRINT#1, "TUS FUN 
TOS HAN SIDO";P 

1 620 PSET ( 1 00 ,30 ) ., i ü PR I NT* 1, " RECORD 
" ; R 

1 630 PSET ( 1 , 1 70 ) ,1¡ PR I NT# 1 , " OTRA F 
ARTIDA, SI C NO" 
1640 Z*=INKEY* 

1650 IF Z$="S" OR Z'*«"s" THEN RESTO 
RE: CL03E: GOTO 60 

1660 IF Z$="N" OR Z*-"n" THEN ENE 
1670 GOTO 1640 

1680 RJEM CHOQUE DE AVION, TANQUE 

1 690 PLAY " S9N2000T255O6CC " : PUT SPR I 

TE 0, (X, 175) ,7, 2: PUT SPRITE 1 4 (256, 

256 ! , ,5: FOR 1*1 TO 500: NEXTí PUT SPR 

ITE 0, (256,256) , , 5: N-0: Nl-0: 

: V-V-l s Yl «¡36 : GOSUB 1 390 

1700 RETURN 

1710 REM CHOQUE BOMBA DEL TANQUE, AV- 
ION 

1720 PLAY ,, S9M2000T255O6CD":PUT 3PRI 
TE 1, (XI, Yl) , 15 5 2:PUT SPRITE 3,(256 
,256) , ,5: FOR Í«Í TO 500: NEXT: PUT SF 
RITE 1, (256,256) , , 5: X 1=RND (1 > *256s P 
=P+50: N=0: Z=0: Y2=165: Yl 
1730 GOSUB 1370:GJ3SUB 1820 
1740 RETURN 

175» REM CHOQUE BOMBA DEL AVION, TAN 
QUE 

1760 PLAY " S9M2000T255O3DCD " : PUT SPR 
ITE 0, (X, 175) , 10,2:PUT SPRITE 3, (25 
6,256 ) , ,5: PUT SPRITE 4 , ( 256 , 256") , , 5 
:FOR r«l TO 2000: NEXT: PUT SPRITE 0, 
(256, 256) , ,5: V=V-1: X1=RND(1) *256:N1 
=0:N=0 

1770 Y1=36:C=248:Z1=0:X=125:GOSUB 1 
— 




390: GOSUB 1800 
RETURN 

REM PONE COMBUSTIBLE 
LINEU6S, !) •- (248., 9) , 4, BF: PSET 
0) , 1 s PRINTttl "COMBUS"-. RETURN 
REM INCREMENTA COMBUSTIBLE ■ 
1820 C^-C+20: IF C>243 THEN C-248 

1830 LIME (C 20, 1 ) •■- (C, 9) , 4,BFs RETURN 

1840 REM DISMINUCION DEL COMBUSTIBl 
E 



1780 
1790 
1 800 

1810 



1850 
1860 
1870 
1880 
1890 
1900 
1910 
1920 



LINEÍC, 1)--(C,9) 
C=C-1 

IF C=16B THEN iDSt 
RETURN 

REM INSTRUCCIONES 

3CREEN lrWIDTH 31 

COLOR 1 5,4, 4 : KE YOFF 

LOCATE' 9,0: PR I NT " I NSTRUCC I ONE 



1930 LOCATE 0,8: PR I NT-: PR I NT " Debes d 

estruir al avian evitan da que te a 

1 caneen sus bambas y vigila el comb 
ustible que se incrementara al des 
truir un avión, pero cuidado porque 
si se acaba, tu tanque se destruirá 

ii 

1940 LOCATE , 20 : PR I NT " F'ul sa una te 
cía para comenzar" 
1950 A$= I NKEY* 



1960 IF 
ETURN 



A*-"" THEN GOTO 1950 ELSE R 
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Programa 



Test de listado 



1 (7$ 

x vj 


— 0) 

YJ 


~-A~A0S 

YJ YJ 


-•• 1 OS 1 

l Y..' X 


590 


- os 


860 




L 32 


1 1 70 


vJ 


1460 





1 750 

X / w >..' 


- os 

fm' 




— OS 

YJ 


1 (7J 


— "?(7)4 


600 


- t "?4 


8 ^''5 

\-J / f-' 




1 39 


1 1 R(7| 


— A 


1470 


-219 


1 760 


•- 29 


VJ 


— os 

YJ 




- ^^i 


6 1 


- 1 34 


900 






i 1 9(7) 
í X 7VJ 


VJ 


1 480 


30 


1 77(71 

.i. 9 4 


- ?Q 


¿un 


- 

YJ 


1£' 


i- 


69(7) 

w )-' 


- 1 34 


9 1 

/ X >-- 




X w J — 




— ¿X 


1490 


-253 


17R0 


L 4-2 


%J VJ 


— os 

YJ 


340 


-230 




- 1 T4 

X •— ■ T 


99(71 




1 "^9 


1 9 1 (71 
x ¿_ x »y 


— 1 (71 
X \í> 


1500 


-142 


1 790 

X / 1 r~> 


- 


A (7) 


- 1 49 
x tí. 


350 


- 24 


640 


X ' w 


930 




OS 


1 ^^f?} 

X Jti f i lg 


- 1 1 

1 X 


1 5 1 


- 


1 R00 




7(71 

/ Y.' 


— OS 

YJ 


360 


- 64 


650 

\—J W fm' 


-138 


940 




132 


1 9 T (71 


— 1 (71 
X VJ 


1520 


• 1 4 1 


1 R 1 


j7J 


R("í 


— 99"? 


370 


- 58 


660 


- 138 


950 

7ÜK' 




1 " ? :4 


1 94(7) 
x j_ ^ ¡..' 


— ¿L 
• 


1530 


- 95 


1 89(7) 


-- 15^ 

X w W 


TIO 


— T 1 


380 


-131 


670 


- 1 40 


Q A (71 




1 T" 7 


1 9«=¡(71 


— . /i 
*+ 


1 540 


— 224 


1 RtVj 

L O •_' Vi' 


- "ti 

■■J X 




— 1 1 f/l 


390 


-192 


AR0 

O O YJ 


-- 1 4. A 


Q7(71 




1 

1 OJ 




— ¿L 

*~ 


1550 


-227 


1 R4(7J 
X CtVJ 


— 


1 1 (Tí 
1 X VJ 


— 9 1 9 


400 


-170 


690 


- t 46 


9R0 

/ avj 




1 "^A 

X — ' o 


1 97(71 
X ¿- l VJ 




1 560 


~22 l 2 


1 850 


- 139 

X *•»■ / 


X X-Jl' 


_o i ■* 


4 1 


-161 


700 


- 148 

X "T bal 


QO(7) 




1 "TA 

X •_'*T 


1 ^R(7) 


— (71 


1570 


- 97 


1 860 


-121 

X 4—, X 


1 ~*.0S 


— (75 


4-20 


-218 


7 1 


- 1 4R 


1 (7J(7i(7j 




1 "Vi 


1 1Q0S 
X ¿-/\J 


— =; a 


1 580 


-174 


1870 


.1— .• 


1 ACA 


-17c; 


430 


- 


770 


— 1 4"? 

X ^ al.. 


1 (71 1 (71 




1 TA 


X ■-•VJVJ 


— 1/1 


1590 


-216 


1 880 


— 14" 


X «J>£' 


— 1 AZI 


440 - 90 


7^.0 


- 1 "^.A 


1 lililí» 




1 T7 


1 •_' X VJ 


— 1 T7 


1600 


-134 


1890 


(7J 


1 A(71 


*T / 


450 


- 14 


740 


- i "^.A 

X W w 


1 ("IT (71 




I T7 


1 T9^l 


X vO 


1610 


- 149 


1 900 




1 / VJ 


_ 1 DO 

— lov 


460 


- 


7^(71 


— 1 "TA 
X •_' o 


1 (A A i"A 
J. VJ *t íí' 






1 "T"TfV( 




1 620 


■- í 1 

X X 


1 9 1 (7) 

x / x >:.' 


— 7f^ 


1 Qí71 
1 Olí' 




470 


-167 


7 A (71 
/ Olí' 


— os 

VJ 


1 1;' u lí' 




1 TA 


1 


— 4 el 


1630 


- 1 74 

x * r 


1920 


_ 70 


1 Víí' 


.¿. K' W 


480 


- 1 50 


77r71 
/ / VJ 


— 1 TA 


1 //( ¿- CA 




1 TO 


íojfí' 


- 1 6 1 


1 A40 


- 


1930 


-241 


200 


- 75 


490 


-255 


780 


-136 


1070 




138 


1360 


- 


1 650 


- 11 


1940 


-156 


210 


- 




-158 


790 


-140 


1080 




144 


1370 


-139 


1 660 


-251 


1950 


•- 64 


220 


-135 


510 


- 71 


800 


- 146 


1090 




146 


L 380 




1670 


- 5 


1960 


-162 


230 


-241 


520 


- 43 


810 


-143 


1 100 




. 


1390 


- 24 


$ 680 


- 






2-40 


-135 


530 


-214 


820 


-143 


1110 




5 


1 400 


-142 


1690 


-216 






250 


-200 


540 


_ ->crrr 


830 


-134 


1120 




•y 


1410 


- 


1700 


-142 






260 


-207 


550 


- 67 


840 


-142 


1130 




7 


1420 


- 45 


1710 


- 






270 


- 0- 


560 


-202 


850 


-145 


1 140 




7 


1430 


~ 22 


1720 


~-2" :r 






280 


-247 


570 




860 


-142 


1 150 




7 


1440 


- 1 1 3 


1730 


-242 


TOTAL : 


290 


-102 


580 




870 


-132 


1160 


— 


* 7 


1450 


-142 


1740 


•••142 


20E 


































SUSCRIBETE 

Suscribiéndote no sólo tienes la seguridad tic tenef todos los meses tu 
MSX CLUB DE PROGRAMAS en tu casa sino que recibirás 12 
números pagando sólo 10 



BOLETIN DE SUSCRIPCION MSX CLUB DE PROGRAMAS 



Nombre y apellidos 

Calle 

• • 

Ciudad Provincia 

D. Postal Teléfono 



• •••••••••■•a •••■•••••>••■■■ 



Deseo suscribirme por doce números a la revista MSX CLUB DE PROGRAMAS a partir del número 
que pago adjuntando talón a la orden de: MANHATTAN TRANSFER, S.A. - CÍ. Roca i Batlle, 1C 



Tarifas: España por correo normal Ptas. 2.250,— 
Europa por correo normal Ptas. 2.600 — 
Europa por correo aéreo Ptas. 3.250 — 



Importante: Colocar en el sobre: Departamento Suscripciones MSX CLUB. NO SE ADMITE CONTRAREEMBOLSO. 
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rama 



Por Luis Ramón Giménez, 



ROMPECABEZAS 



Debes intercambiar las pala- 
bras AZUL Y ROSA de sus res- 
pectivos recuadros; pero te avi- 
samos, no es nada fácil. ¡Atréve- 
te con este divertido programa! 



10 RE!i ROMPECABEZAS 
20 F ÉJÍ 

30 REM ORDENADOR MSX 
40 REM 

50 REM AZUL & ROSA 
60 REM 

70 REM Por Luis Ramcn Gimsnaz 
80 REM 

90 COLOR , 1 , i 

100 DIM A (4, 5) : DEFINI A Z 

110 X*l.s Y-lsE>15 

120 FOR 1 = 1 TO 4:A;i J p-I:NEXT 
1 30 FOR I -5 TO B:.A (3, I - A • ~ í s " f£ ■ t 
140 A (2, 4) =9 

1 50 FOR I - 1 TO 3 : A • I H ■ ~ : 1 s A ( + .. 5 
0: NEXT 

160 OREN"BPR::" FOR GUTPUT AS #! 

170 COREEN 2.3,0 

180 COLOR 3 , 1 ,, i 

190 FOR J=l TO 9 
200 IF .7-0 THEM J¿'# 
210 5$=" " 
220 FOR 1=1 TO 32 
230 READ R 
240 S*=S*+CHF* (R) 
250 NEXT 

260 SPRITE*<J) «3* 
270 NEXT 

280 SPRITEÍ (3) •~SF'RITE$ < i ) 
2?0 LINE ( 29,27)- (151, 170) ,2. BF 
300 LINE- 34 ! ,32)~< 67, 165). i, 3F 
310 LINE ( 73, 32) ~( 106, 165) , 1 , BF 
32)-a45^ 165) . i,BF 
66) -% 72, 98 5 ¿ 3 ,BF 
99) -(11. t, 131) , i„BF 



Gf'RITE I t, (35.33*1) ,3 ; , 



320 LJNE<112 
330 LINE ( 68 
340 LINE (107 
350 FOR 1=1 TO 4 
360 Ri 
370 NEXT 
380 FOR I~8 TO 8 

390 RUT 5PRITE 1-1, ( 1 1 3, 33* < I~4 ) ) , 1 
3,1 

400 NEXT 

410 RUT 3RF.ITE ( 74 , 1 32 ) , 6 , % 
420 LINE ( 175, 30) - (230, 102) , 15, B 
430 COLOR 5: DRAW"BM1B0, 35" : PRíMTttl , 
"AZUL" 




V 

I 1 \ 



440 CCLOF 1 1 s DRAW " BM 1 97 , 50 " : F R I NT* i 

450 COLOR 13: DPAVPBM188, 65" : PRf NT#1 
, "ROSA" 

460 COLOR 15: DFAW"BM184, 90" : RRINT#1 
, "RUZLE" 

470 DRAW'BMl™, 1 40" : PRINTtt 1 , "TIRADA 
S" 

480 ' ENTRADA TECLADO 
490 GOSUB 1050 

500 XX*=INKEY*s IF XX*=" " THEN 630 
510 ON 5TICK (0) GOSUB 530,530,560, 
580,580,380,600,530 
520 GOTO 500 
530 IF Y=i THEN RETURN 
540 GOSUB 1040: Y=Y-1: GOSUB 1 
URM 



550 Y=Y+1: BÜS'JB 1030 



560 IF X=3 THEN RETURN 

570 GOSUB 1040: X = X+l:GOSUP: l$50sFET 
URN 
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Programa 




580 IF V «4 THEN i" ETURN 

590 gosub 1040: y=y+1 : gosub 1050: ret 
urn 

600 l~ £ THEM R ETURN 

610 GOSUB 1040: X = X--1: GOSUB 3 050: RET 

URN 

620 * VERIFICANDO 

630 IF A<X, Y>=0 THEN 500 

640 IR A ( ' , Y . 1 ) *0 AND A < X , Y - i j -0 TH 

EN 730 

650 Hl~<3 

660 :7 A<X, Y+l>-0 ÜF AÍX, Y-l) THEN 

670 IF( <X = i A.ÍD Y~2; OR(X=2 AMD Y~3 
> j AND A<X+l f Y>«0 THEN IF H 1 -• ". THEN 

730 EL 33 .'. ~ ••: :X,Y)=9 THEN 500 ELSE 

StfoUB 940: GOTO 810 
680 :Fv'X-2 AND Y-2) OR (X=3 AND Y» 
3>> AND AíX--l,Y-)«0 THEM IF Hl«l THE 
N -70 ELSE IF A (X, Y) 5=9 THEN 500 ELS 
E GOSÜB 930:2330 BÍ0 

690 ÍF A<X ; ,Y+1)=0 "HEN GOSUB 860 sGO* 

T". OI <7i 



UB 900:00 



C 810 

700 IF A£X,.YVí)»0 THEN 
TO 810 

710 30^2 500 

-2.0 - KDVÍ MIENTO DE FICHAS 

730 C=7-¡ GOSUB 1030: C* i 5 

740 OM STIC!.: (0) GOGUB 760., 760, 770, 

780 s 730 , 730 ,790,760 

730 COTO 740 

760 IF A(X,Y-l)-0 THEN GOSUB 9£g04 GO 

770 Ir A<X,Y)=9 THEN 770 ELGE IF ( < 
X=l AMD Y=2> OF: <X=2 AND Y-SVí AND 
A<X+i f Y) -0 THEN GOSUB ?40iGGT3 B10 
ELSE .200 ELSE 300 

7e0 IF A<X ? Y+1>«0 THEN GOSUB 360:30 
TC 810 ELSE 300 

790 IF A f X , Y ) -9 THEN 730 ELSE IF((X 
-2 AND Y=2)0R<X«3 AND Y=3> ) AND A(X 
-1, Y>=0 THEN GOSUB 930: GOTO 310 ELS 
E 800 ELSE 800 
800 7 LÍ'StB? 

810 FOR ZZ-i TO ft IF A ( % , ZZ ) -ZZ * 4 T 
HEN NEXT ELSE GOTO 330 
820 FOR ZZ-1 TO 4: IF A(3,ZZ>-ZZ THE 
N MEXTsGOTü 1070 

830 IF A ( X , Y) < >MM THEN MM-ACX, Y) : TT 
=TT+1:LINE'(170, 3 50 ) -- ( 250 . 15¿> , 1,BF: 
DRAM " BM 1 80 , 1 50 " : PR I NT# í 9 TT 
B40 G03ÚB 1050: GOTO 500 
850 ? MOVIMIENTO 

860 SWAP A ( X , Y ) , A ( X , Y-+ 1 ) : GOSUB 1040 
:Y=Y+1: GOSUB 1020: GOSUB 370:RETURN 
870 FOR L=l TO 33 



880 RUT SRRITE A (X, Y) --1 , (39*X~-4, 33* 
Y-33 + L) ,CC, A(X, Y) 
890 NEXT: RETURN 

900 SWAP A ( X , Y ) , A ( X „ Y- 1 ) : GOSUB !. 040 
: Y- Y- 1 : GOSUB 1020: GOSUB 91 0: RETURN 
910 FOR L=l TO 33 
920 RUT SRRITE A(X.Y) 
Y+33-L) r CC, A(X, Y) 
930 NEXT: RETURN 

940 SWAP A ( X , Y ) , A ( X +• 1 ? Y ) : GOSUB 1040 
: X* X+Íí GOSUB 1020: GOSUB 950 i RETURN 
950 FOR L«l TO 39 

960 RUT SRRITE A<X, Y>-1, <39*X 4--39+ 

L,33*Y> , CC, A (X, Y) 
970 NEXT: RETURN 

980 SWAP A (X, Y) , A ( X - 1 , Y) : GOSUB 1040 
:X=X-ls GOSUB 1020: GOSUB 990: RETURN 
990 FOR L*l TO tf<? 

1000 RUT SRRITE A(X, Y>~1, <39*X 4+39 

-U33*Y) f CC, A<XyY) 
1010 NEXT: RETURN 

1020 IF A<X,Y>*<4 THEN CC«3 ELSE IF 

A(X S Y>~9 THEN CC-6 ELSE CC- 13 
1030 RETURN 

1040 LINE <39*X~5, Y*33) - ( 3 9 * X -5+33 , Y 
*33+33) , i.BF: RETURN 

1 050 L I ME í 39 * X -5 , Y * 33 ) - ( 39 $ X -5+33 , Y 

ÜC33+33) , C j E<F : RETURN 

1060 ' FINAL DEL JUEGO 

1 070 DRAW » BM20 , 180": PR I N%# 1 , " L I STO ' 

1080 DRAW "BM 100, 1S0":PRINT#1, "JUGAR 

OTRA(S/N>?" 
1090 XX$=INKEY$: IF XX$-"" THEN GOTO 

1090 

1100 IF XX*="N M THEN END ELSE IF XX 
*="S" THEN RUN ELSE GOTO 1090 
1110 ' DATA DE SPRITES 
1120 DATA 255, 254 ,248, 243 ,24 1,227 ,2 
31,231, 192,192, 199,207,207, 199, 131, 
255,255, 12-, 3 1,31, 143, 199,231,271,3 
, 3, 227, 243, 243, 227, 193, 255 



130 DATA 255, 128, 128., 1 



1 



•i • '— i cr nr 



55,252,243,225, 199, 143, 159, 128, 192. 
255,255,3, 1,241,227, 199, 7, 31 , 127, 25 
5,255,253,249, 1, 1,255 
1140 DATA 255,131,199,231,231,231,2 
3 1 , 23 1 , 23 1 , 227 ,227,241, 240 , 248 , 254 ., 
255,255, 193, 227 , 23 1 , 23 1 , 23 1 , 23 1 , 231 
, 231, 199, 199, 143, 15,31, 127,255 
1150 DATA 255,195,199,207,207,207,2 
07,207,207,207,207, 199, 195, 192,224, 

nccr ^-inrcr '-lercr nirc "-.crnr '-irrcr npcr ->cr cr -icrir 

tí wJ W , -■• — 1 — 'i <.UW| 1>.WW | ¿WWl ............. ¿üw ( ¿Jw< ¿~\J<-J 

, 255, 255, 255, 239, 207, 15, 15, 255 

1 1 60 DATA 255,128,192, 207 , 207 , 207 , 2 

07,192,192, 207 , 207 , 207 , 207 ,199,131, 



— 
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255,255, 15,7,227,243,243,227,3,7, 14 

3,207, 199,231,243,225,255 

1170 DATA 255,224,192,199,207,207,2 

07 , 207 , 207 , 207 , 207 , 207 ,199,192, 224 , 

255, 255, 7, 3, 227, 243, 243, 243, 243, 243 

243, 243 24— 227 7 7 "^"^ 

11S0' DATA 255, 240, 224^199, 207, 207, 1 
— ^ 



99, 224, 240, 255, 255 

2-S A T '~ 1 5 

7,243,243,227 
1190 DATA 255 
52, 251 . 243, 24 



- rr •— . nr '-y — n -r * — . ir- — »n 

,247, 243,251.. 252, 254, 

¿, T ¿,T •y.Cte *i cr nr rr * tr -i 
jj O*') B-'j- A — ... , - ww t ul ■ Jl 



Test de listad< 



10 


- 


1 90 


- _. ^ o *? 


370 


- 1 3 1 


550 


-151 


730 




910 


-2 1 6 


1090 - 


50 


20 


- 


200 


~ 10 


380 


-194 


560 


~ 73 


740 


- 2 


920 


-- 70 


1100 - 


Jim 


30 


- 


210 


- 1 70 


390 


-113 


570 


- 70 


750 


•-125 


930 


„ -rrr 


1110 - 


^ P 


40 





220 


-180 


400 


-131 


5S0 


- 80 


760 


-228 


940 


-160 


1 1 T 


246 


50 


_ 


230 


-217 




-177 


590 


- 72 


770 


-207 


950 




1130 - 


4 r> 

i. O 


60 


~ 


240 


- 6 


v& 


-168 


600 


- 76 


730 


-137 


960 


- 76 


1140 - 


158 




- 


250 


- 1 3 1 


430 


-119 


610 


~ 71 


790 


--250 


970 


— rr 


1150 - 




S0 


- 


260 


-236 


440 


-106 


620 


- 58 


800 


- 58 


930 


-202 


1160 - 


194 


90- 


- 57 
-226 


270 


-131 


450 


-129 


630 


-215 


810 


- 39 


990 


'">'*•'-• 


1170 - 


144 


100 


2S0 


146 


460 


-216 


640 


~ 42 


820 


- 1 15 


1000 


- 76 


1180 - 


45 


1 Í0 


-11? 


290 


- m 


470 


- 98 


650 


-121 


830 


-14" 


1010 


- 75 


1190 - 


41 


120 


_ o 

■c- 


300 


-21 í 


480 


- 58 


660 


-137 


340 


- 127 


1 020 


-T 

— 






130 


- 19 


310 




490 


-1S5 


670 


-130 


650 


en 


1 030 


-142 






140 


-239 


320 


-111 


500 


219 


630 


-223 


860 
870 


- 32 


1040 


-161 






150 


- 47 


330 


-24° 


510 


- 99 


690 




• 2.1,6 


1 050 


••210 






160 


-177 


340 


137 


520 


• J 40 


700 


-243 


380 


- 70 


1 060 


- 58 






170 


- 85 


350 


■•••136 


530 


.. ~?~7 


710 


- !. 40 


890 


..... 73 


1 070 


-212 


TOTAL 


* 




.... 79 


360 


- 197 


540 


73 


720 


- 58 


900 


-124 


1080 


-102 


1 424í 
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RUNNER. Para librarte de un conjuro, debe- 
rás recoger 30 estrellas sagradas e impedir 
asi la invasión de tu ciudad. 



MAZE MAX. A bordo de un rápido bólido, 
deberás atrapar las 10 banderas perdidas 
en el laberinto. 



í 1 



DEMONIA. Solamente las (rutas mágicas 
nos darán la tuerza y el valor para afrontar 
monstruos de Demonia. 



CONECTATE 



AL SOFT 




KARATE. Enfréntate a los mejores maes- 
tros de las artes marciales en combates 
completos. Si eres el mejor, podrás dar la 
vuelta al mundo. 



HOWARD. Tus dos mejores amigos, están 
prisioneros en un volcan en actividad. Debe- 
ras atravesar ríos, arenas movedizas y lu- 
char contra un ejército por ellos. 



BALLBLAZER. Estamos en el ano 3097. 
¿Preparados para luchar? Con nuestra 
nave participaremos en el juego más atrevi- 
do y peligroso de la galaxia. 



QUE MAS 



ALUCINA 



EN TIENDAS ESPECIALIZADAS Y GRANDES ALMACENES 

Distribuido en Cataluña por: DISCOVERY INFORMATIC. C/. Arco Iris. 75 - BARCELONA - Tels. 256 49 08 / 09 



PR0EIN, S.A. 

Velázauez. 1 - 28001 - Tels. (91 ) 276 22 08/09 



Programa 



C.A.D. 



Gracias a este programa po- 
drás entrar en el mundo del 
C.A.D. (Computer Aided De- 
sign) con tu MSX. Un intere- 
sante programa de diseño gráfi- 
co para los amantes del arte. 
Ver instrucciones en pág. 67. 



10 REM **)!<**^ 

20 REM * COMPUTER AIDED DESIGN * 



* 
* 

SALVADOR* 
* 
* 



30 REM * C.A.D. 
40 REM * by 
50 REM *JOSER LAINE2 I 
60 REM * para 
70 REM * MSX -CLUB 

30 REM * (c)Lleida 1987 * 
90 REM * ** *# ** %.% %*%% 
100 REM *** PRE3EMTACIÜ *** 
1 1 PLAY !! L 1 6V i 50 4 " s CLS 8 S CREEN lsWIDT 
H21 : COLOR 15,1,1; KEYOFR : VP0KE82 1 9 , & 
H21 

120 PRÍNT: PRINT 
130 PRINT" 
140 RR I NT " 
150 PRINT " 
160 PRINT" 
170 PRINT" 
180 FRINT" 
190 PRINT" 
200 PRINT" 




210 
220 l 

130 LOCATE 7, 15s PRINT" sof tware" 
240 LOCATE 3, 17: PRINT" p resé n t 
a" 

250 LOCATE 8 , 1 9 2 RR I NT "C.A.D. " 

260 FGR t»i TO 1000: NEXT 

270 REM *** INICIO *** 

230 GOSUB 1510: SCREEN0S SCREEM 2,0,0 

: CLEAR 255,60999! : DEF I NTA-Z : L I NE ( , 

0) -(255, 191) , 15, B 

281 FORI~0TO255STEP5: LINE ( I , 0) - ( I , 3 
) i 15:LINE(I, 191)-(I, 188) „ 15:NEXTI:F 
ÜRI=0TOi91STEP5:LINÉ(0, I)-(3„ I) :LIN 
E(255, I)-<252, I) : NEXTI : LINE (4, 4) - (2 
51, 187) , 15, B 

290 SPRITE* ( í ) =CHR* <&HE0) +CHR* (&HA0 
)+CHR*íS/.HE0) 

300 X-126: Y-95:L=1:C=15:PI=3. 14159: 
R=0:DEFUSR-55000 ! s DEFUSR 1=550 13 ! 
310 FOR K=l TC 5:KEY<K)0N:NEXT 
320 ON KEY GOSUB 430,460,480,610,11 
50 

330 REM *#* LOOP PRINCIPAL *** 
340 GOSUB 1050 




350 RUT SPRITE 0,(X,Y),6,1 
360 I$=INKEY$ - 

370 IF 1*="," THEN C=1:PLAY"C" 
380 IF 1*^"." THEN C= 15: PLAY" A" 
390 IF L-l THEN RSET ( X + i , Y+2) , C 
400 IF I$=CHR$(li) THEN PLAY"D" : LIN 
E(5 5) -«250, 186) , 1 , BFs X=126: Y=95 
410 GOTO 340 

420 REM *** SUBE/BAJA LAPIZ *** 

430 PLAY"D":IF L THEN L=0: RETURN 

440 IF L=0 THEN L=l: RETURN 

450 REM *#* PINTAR ESPACIOS *** 

460 PLAY " D " : RA I NT ( X , Y ) , 15: RETURN 

470 REM *** TIRA LINEAS *** 

480 RLAY"D" 

490 GOSUB 1050 

500 RUT SPRITE 0,(X,Y),6,1 

510 IF INKEY*=CHR* (27) THEN X1=X:Y1 

=Y:GOTO 520 ELSE 490 

520 PLAY"E" 

530 GOSUB 1050 



— 
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540 PUT SPRITE 
550 I*=INKEY* 

560 IF I*-"!*' THEN X2=X : Y2=Y: PLAY"E 
"sLINE(Xl+3,Yl.+3)-<X2+3, Y2+3) , 15: PU 
T BPR I TE i ,10, 209 ) : RETURN 
570 IF I$="2" THEN X2=X : Y2=Y: PLAY"E 
":LINE(X1, Y1)-(X2,Y2) , 15, B: PUT SPRI 
TE 1, (0,209) : RETURN 

580 IF I*="3" THEN X2=X : Y2=Y: PLAY"E 
":LINE(X1 ? Y1)-(X2,Y2) , 15,BF:PUT SPR 

I TE 1 , ( 9 209 ) : RETURN 
590 GOTO 530 
600 REM *** COMPAS **# 
610 PLAY"D":X1=X: Y1=Y 
620 S=STICK<1) OR STICKÍ0) 
630 IF 3=0 THEN 690 ELSE Yl=Yl+i*(S 
< 30R3=B ) - 1 * ( S >3AND3< 7 ) 
640 X 1 =X l + i * <S>5 ) -• 1 *;< S > 1 AND3< 5 ) 
X 1 < THEN X1=0 
Xl>252 THEN XI =251 
Y 1 < THEN Y 1=0 
Y1M88 THEN Y 1 = 188 
SPRITE 0, (XUY1) ,6, 1 

X2=X 1 : Y 



I F 
IF 
IF 
PUT 



65-Zí 
660 
670 
680- 
690 

700 IF INKEY*=CHR*><27) THEN 
2=Y1:PLAY"E":G0T0 710 ELSE 
S=STICK<1) OR STICK(0) 
IF 5=0 THEN 790 

Y2=Y2+1* <3<30RS=S) -1 * CS>3ANDS<7 



/ i VJ 

720 
730 
) 

740 

750 
760 
770 
780 
790 
800 



X2=X2+i* <S>5) (S>1ANDS<5) 
IF X2<0 THEN X2=0 
IF X2>252 THEN X2=252 
IF Y2<0 THEN Y2=0 
IF X2MS8 THEN X2=188 
PUT SPRITE 1, CX2,Y2>,7, 1 
IF INKEY$=CHP*(27) THEN XÍ=X:Y1 
=Y : PLAY " E " s GOTO 820 
810 GOTO 710 

THEN R=X1-X2 
THEN R=X2-X1 
THEN R=Y1 -Y2 
THEN R=Y2-Y1 



820 
830 

840 



850 



IF 
IF 

IF 
IF 



860 
870 



XI >X2 
XKX2 
Yl >Y2 
Y 1 < Y 2 
I$--TNKEY$ 

IF X*»»l'- THEN C I ROLE ( X , Y ) , R , 15 
2*P I /4 , 3*P I /4 : GOTO 1 030 
380 IF I*="2" THEN CIRCLE ( X , Y) , R, 15 
,2*PI/4>PX:GQT0 1030 

890 IF I**"3 M THEN CIRCLE ( X , Y) , R. 15 

,2*PI/4,5*PI/4:G0T0 1030 

900 IF I*="4" THEN CIRCLE ( X, Y) , R, 15 

,2*PI/4,6*P 1/4 :GOTO 1030 

910 IF I*="5" THEN CIRCLE í X , Y) , R, 15 

,2*PI/4,7*PI/4:G0TÜ 1030 

920 IF I*=»6" THEN CIRCLE ( X , Y) \ R, 15 

,2*PI/4,2*PI:G0T0 1030 

930 IF I$="7" THEN CIRCLE (X, Y) 15 

2*PI/4,P 1/4: GOTO 1030 
940 IF I*=»8" THEN CIRCLE ( X , Y) , R, 15 
,2*P.I/4.6*PI/4íG0Tü 1030 



950 IF I*="9" THEN C I RCLE ( X , V ) , R , 15 
:GOTO 1030 

960 IF I*="0" THEN CIRCLE ( X , Y 5 , F ',, 15 
,PI,2*PI:G0T0 1030 

970 IF I*= THEN CIRCLE ( X . Y) , P, 1 5 

i ,PX't 60TG 1030 

980 IF !$="*" THEN CIRCLE ( X , Y) „F , £3 

, PI/4,5*P 1/4: GOTO 1030 

990. IF I*="#" THEN CIRCLE ( X, Y) , R, 15 

, S * P I / 4 „ P I / 4 : GOTO 1 3 

1000 IF 1*="$" THEN CIRCLE (X, Y; , F . ! 

5 S 3*PI/4,7#PI/4:G0T0 1030 

1010 IF l %='"/." THEN CIRCLE < X, Y) ,P, .1 

5,7*PI/4,3*P 1/4: GOTO 1030 

1020 GOTO 860 

1030 PLAY"E":PUT SPRITE 1 < 0,209) sR 
ETURN 

1040 REM *** CONTROL *** 

T050 S=STICK< 1 ) OR STICK(0) 

1060 IF E=0 THEN RETURN 

1070 Y=Y+1* (S:::30R3=G) -1 * (S>3ANDS<7) 

1 080 X=X-*-l*<S >5 ) - 1 # { 3 1 AND5< 5 ) 

1090 IF X<3 THEN X=3 

1100 IF X--250 THEN X=250 

1110 IF Y< 2 THEN Y=2 

1120 IF Y>185 THEN Y=133 

1130 RETURN 

1140 REM *** INPUT/OUTPUT *#* 
1145 PLAY " D " 
1150 I$=INKEY$ 

1160 IF I.*="l" THEN GOSUB 121*8 RSTU 
RN 

1170 IF I*= !, 2" THEN GOSUB 14405 RETU 
RN 

1180 IF I$="3" THEN GOSUB Í470:RETU 
RN 

1190 GOTO 1150 

1200 REM *** SALIDA IMPRESORA *** 
1210 PLAY " D " ! FOR CO 1=61000! T.Ü 6119 
2! : POKE CO ! ,0:NEXT 

1220 BAV.=BASE < 12) i-243: PO ! =609?^ ! íFI 

7.=6143: XC7.=24S: YC7.-0 

1230 FOR LI7.= 1 TO 32 

1240 FOR AS7.=BA7. TO FIV. 3TEF 256 

1250 FOR CA7.=A37. TO AS%+7 

1 260 D A7.= VPEEK ( CA7. ) 

1270 IF DAX=0 AND POINT ( XC7. + 4 , YC7.X 

>PEÉK<8«HF3EA) THEN DA7.=255 

1280 • PO ! =PO S + 1 : POKE PO ! , DA7. : YG%*YC% 

41 

1290 NEXT 
1300 NEXT 

1310 PO ! =60999 ! : BA7.=BA7.-S : F 1 7.=F 1 7.-8 

aXC7.=XC7.-8:YC7.=0 

1320 LPR I NTCHR* ( 27 ) ; " B " ; 

1330 LPR I NT SPACE*<8); 

1340 LPR I NT CHR*(27) ; "S"; "0192"; 

1350 FOR CO! =61000! TO 61192! 

1360 FE7.=PEEK (CO ! > : IF FE7.=9 THEN FE 
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Programa ih^iw , 



1370 LRRINT :-HR*(FE!'.> i 
i T80 NEXT 
1390 LRRINT 

i4m NEXT 

1410 LPR'INT ¡ "A" 

1420 RETURN 

147-3 REM *« GRABACION *** 
L43S FL.r-:' "'E" 

Í4¿0 55AVE"CAS¿ CAD" , 38000 ! ,54334: 
146a! Z-USR1 (#) ¡: RETURN 
1470 REM f** LECTURA *** 
1475 RLAY M E" 

14B0 ZZ-L3F <m s E'LGAD"c:¿.3¿ CAD" 
14^$ ZZ-USR1 <0) 
1500 RETURN 

151 il? REM C'Z'D 1 5Q MAJ3UINA ttt. 

1520 FÜR X- 55000! 7G 55025 ! s READV* 
1530 RÜKE X . VAL < "% !••!" H'« s B-'S*PEgK í X 

1540 next 

1550 IF S<: i743 THEN BEEP i CLS : PR I NT 
''HAY UN ERROR EN LA CARGA DE DATAS" 

1 560 DATA 2 1 , 00 s 00 , 11,70,94,01, 00 , 4 
s W. * 59 , 00 , C9 , 2 i „ 7.0 , 94 r 11, m , 00 , 1 , 



Test de listado ■ 



























10 





250 


-160 


480 




720 




960 


- 32 


1 190 




1430 





20 





260 


-105 


490 


-185 


730 


-227 


970 


-164 


1200 


- 


X "**í" O -I.,' 


- 74 


30 


- * 


270 


- 


500 


-102 


740 


-139 


980 


-119 


1210 


-106 


1440 


-136 


40 


- 


280 


- 17 


510 


-2 19 


750 


-122 


990 


- 90 


1220 


146 


1 450 


-179 


50 


- 


281 




520 


- 74 


760 


-108 


1 000 


-100 


1230 




1 460 


.... 9S 


60 


- 


2^0 


-230 


530 


-135 


770 


-124 


1010 


-101 


1240 


- 87 


1470 


- 


70 


- 


300 


-160 


540 


- 104 


780 




1 020 


-246 


1 250 


-110 


1475 


- 74 


80 


- 


3" 1 


-177 


550 


- 72 


790 


204 


1 030 


114 


1260 




1 480 


- 1 04 


90 


- 


320 


- 39 


560 


- 27 


800 


•184 


1040 





1270 


~— "j? jjs 


1 490 


-244 


100 


- 


3 3 


- 


570 


-113 


810 


- 95 


1 050 


- 64 


1280 


-136 


1500 


-142 


1 10 


-241 


340 


- 1 85 


580 


-189 


820 


-172 


1060 


70 


1290 


-131 


1510 


- 


120 


- 92 


350 


- 1.02 


590 


•-171 


830 


-174 


1070 


-127 




-131 


1520 


-12S 


130 




360 




600 


- 


E340 


-176 


1080 


- 39 


1310 


105 


1 530 


- 28 


140 


- 59 


370 


247 


610 


.... ?5 


350 


... 17a 


1090 


- 23 


1320 


-169 


1540 


-131 


150 


-173 


330 


- 3 


620 


- 64 


860 


- 72 


1100 


- 4 


1330 


-218 


1550 


-171 


160 


-173 


390 


- 24 


630 


- 54 


870 


-108 


1110 


- 28 


1 340 


- 5 


1 560 


- 1 20 


170 


-170 


400 


-205 


640 




380 


- 93 


1120 


-132 
-142 


1350 


-231 


1570 


-142 


180 


-170 


410 


-236 


650 


-120 


890 


-112 


1130 


1360 


- 73 






190 


r-srj 


420 


- 


660 


-- 1 05 


900 


-114 


1140 


-- 


1370 


-110 






200 


- 99 


430 


- 72 


670 


ot> 


910 


-116 


Ü45 


- 73 


1380 


-131 






210 


-133 


440 


-198 


680 


-236 


920 


-103 


1150 


- 72 


1 390 


-157 






220 


-133 


450 


- 


690 


-200 


930 


-107 


1160 


- 8 .7 


1 400 


-131 






230 


- 1 80 


460 


-130 


m 


- 4 


940 


-113 


1170 


- 63 


1410 


-109 


TOTAL : 


240 


-169 


470 


- 


- 64 


950 


-203 


1180 


- 94 


1420 


-142 


1Ó962 
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Programa 



Por Manuel y José M. a Senciales M 



MUNDO 



¿Quieres destruir el mundo? 
Este programa tepermite hacer- 
lo. Puedes además utilizar sus 
gráficos de la bola del mundo en 
tus propios programas. 



10 ' MANUEL Y JOSE Mi SEMCI ALES 
20 * MALAGA FEBRERO- i 937 
Versión 3 



m 

50 

7(75 



MUNDO 



sa ~- — as 



CLS : KEY OFF 



30 DEFINTA--J , ! 
90 COLOR 14, 1 

100 QN STOP* GOSUB2030: STOP ON 

110 ? 

120 • PRESENTACION 
1 40 * 

150 PR 7 NT" ¿QUIERE DESTRUI F EL MUND 
3?" i PRIMT 

tm PRI NT "HACERLO ES FACIL, GUANEO 
APARBZCA EL OVNI SOLC TIENES GUE 
PULSAR LA BARRA ESPAC I ADCF A " :: F'f< 1 NT 
i PRINT"AL OVNI PUEDES GUIAR!. O CON 
EL CURSOR" i PR.INT 

170 print"si quieres hacer aparece 
r de nuevo el mundo fulsa la let 
ra í:a:j" 

180 LOCATE0, 19: PRINT"NGTA: Espera tí 
nos 20 segundos" 

190 L0CATE5, 21 SPRINT" (Pulsa ana te 
-la) " 

200 A*~TNKEY$: IF A*=" " THE 
210 • 

220 ' DIBUJO 

230 ' -= — — =.• — :::: 

240 ' 

250 SOPEEN 2,0,0 
260 DEFUSR=&H4 1 : A~USR (0) 
270 SOSUB1670 
230 ' 

290 * Tierra y Lana 
300 ' 

310 CIRCLE (200,85) . 10, 15, , ,1.4 
320 PAINT (200, 85) , 15 
330 PSET<Í98vC 



6s PSET ( 197, 83) , 7: 



3 



PSET (200, 89) , 10:PSE' 
340 CIRCLE ( 125, 95) , 50., 4, , , l' 
350 PAINT (125,95) ,4 
360 CIRCLE ( 125, 95) , 50, 15,3. 14, 0, . 




Vi ^ ^ 



— 1 



370 LINE <125, 95) - < 120, 1 155.. i U LIME 

/■»•-"■ C? i iHV - ? •' •• ' & \ i " .. i * ►,!•— / • — — 4i 

v ¿ ¿% i i. *J J Sár-/ p ¿ -. .. L i Pife, t u I 

5)-- (136,95) , 14 

3S0 LINE (131,95) -i 140,90) , 14: LINE 
(140,90; - C7C^0? , 14; LINE (135, 90) ~ 
( 133, 80) ¡ 14 

390 L I NE ( 1 33 , 80 ) - ( i 25 , 50 ) „ i 4 ; LÍME ( 
125, 80) "(125,-7; , 14: LINE 77> - ( 

121,77) , 14: LINE (121 , 77) •- ' 121. 76) , 1 
4 

400 LINE (121, 76) --(120, 76) ., 14: LINE ( 
120, 7¿/'-- : i 10, 85) „ l4ihm%!.ÍZ& 9 m>-i 
1 10, 90) , 14 

410 LINE '110. 9.0) -(115, 95) , 14: LINE ( 

115,95)- (125,95; , 14 

420 RAI NJ (125, 90) , 14 

430 DRAW"cl4BMi20,75LÍK2U2R2" 

440 LINE "120, 72) -(121, 69) , 14 

450 LINE ( 121, 69)-- (120 s 68) , 14: LINE ( 

120, 68) - ( 124, 67) , 14 

460 DRAW "c 14BM124 , 67U 1 R 1 D 1 R2E2 " 

470 LINE (129, 65) -(130, 60) , 14 

480 DRAW " c 1 4BM 1 30 , 60L 1 G4L 1 U4E5R4F3 

E3R15" 

490 DRAW "BM 120, 75M+2, -3R2M+2, +3G1R 
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Programa 




2M-2 , ~4R 1 F3D 1 R 1 E 1 M-2 , -3E 1 R2U2E2P2F 
2G2L2F ÍD4R3F 1 D3L4D 1. " 



00 DRAW " BM 1 35 , 80M+5 , +8M+5 , ~4*! 2 , - 
F7M+S,~2M+8., +12ElM-¡6.. 15" 



510 CIRCLEÍ125, "7 ,£0, 14., .35, 1.22, 
í 

520 PAINT (140,65) , 14 

, 14 : PAINT < 120!, 73) , 14 
540 C I RCLE (125,49) , 15, 15, f H „ 3 
550 PAINT (115,50) . 15 
560 CIRCLEÍ127, 142) , 15, 15, , , .3 
570 PAINT '125, 140) , 15 
5S0 DRAW " C 3 4BM 1 20 , ó 1 M-* 1 , 4 SH* 7. ti 1 
E1M+1 , -4" 

590 PAINT ( 120, ¿5 > , 14 

600 DRAUTBiill h 9 l". 13:2122" 

6 1 DmU ■ E M ; :?•:• .. i 0D20M- 6 , - í 

2M--5. -7:": ; -i-7, »2"--2, ~4U3E3H2 r 

620 DRAW" EM 00, 100U4M- 12, - Cí 'j: 3 

, + 1L2 -:i: :2E2l i ü !. l. . .7 3 -Y" ¿»-; l&\VJ3m z 

,-iirtm -:,-¿m-- h , --rH-:; v -6" 

630 PAINT 7 „ tmj - 3 4 



» - - 



640 CTRCL2 ( 125,95) „ 50 
650 "A I NT Cm,.7t'} .. I* 

660 draw ! fj k ii00, •;.3L , -'C5rrr2- 



**'$N :. -:YY7D2R7U2" a PAT ■ 

680 7:;72SPl-Ñ íH 44. A-'JSF i<0> 
690 ' 

700 ' 3pri t-¿i- 
710 " 

720 Al : =2YF *• i -i,H0 ' $ : * .: i LS) - < - •- : ' 7 

- , : - --CHPifc 13) • 3MR*<Y70) 
730 E'í- CÜF * • !-:H0) kgHft* : ".. {$< • I; Ti kfójtf 
0)+CHRi ' t;K$í -CHRí ft$*f¡ •• 2' í^-'0).fC 




HR$ :&H0? -«-C'HRt f -?íHí¿í ) 
74$ C£-0;RS Í&.H0) <S<H0> +CHR* Í&H 

16) "C'-!F^ ( r ;..HE ) +GHR* C &H 1 A ) +CKR* <&H8> 
+CHR* (8íH0: : 2! ¡R$ (§<H0) 

750 D*«CHR* ::H0) +- ,, G ,, +CHR* ífcHlE) + M ) 
R$ (!.:H1E: -2HR* ÍSíHIQ) +CHR* (&HC) +• 

c::í" é í '*>'■"■) 

760 • " ! "^«•^•••■CHR*(S í H7F)+»r," + 

" ¡ i» + " t • 11 

770 2:"r':I" ! "2t ' 1 ) «A$ 

- S 2PR I TE* ( 2 ) »fe$ ¡ 3PR I TE* (3) »C* : SP 
RITE* ' 4 ) -LS r, 3PR I TE * ( 5 ) -F* 

790 * 

G00 7 RUTINA PRINCIPAL 

870 RUT SF'PITEl „ (X-2,Y> , 15, 1 

'•• r - " l TES, ( 250-XM* 2 , 30+K ) . 1 1 

B50 P2'T 77RITE3, (5*XM. 150-i-X) . 15.2 

Bés® H>--K+l: XM- XM+l 

870 CNSTIG^ '0; 

330 SP T HENY~-Y -1 

B90 T D --3 ENX-X-^-1 
900 ÍF 2 ~5 THENY-Y+ 1 
910 Zr j ""HENX^X-2 
920 ir. y;-, 2 35 THEMX-4 
930 IF , <-.:-0" r HEn v <"254 
940 IF Y>«:$S THENY=4 



2" r '-'ENY :ss 'i 



F60 BEEP 

970 KS-IMKEYi 
730 IF Kf-" "THEN GGTC 1060 
990 I F ;-'--:;' ! G" ; :$^"A I! THEM2* 
1000 »X-V .. 2 IFX-254THENY-Y+1 

1010 g: t : 270 

1020 r ' 



1030 
1040 
1030 
1060 
1 070 
10S0 

1090 

1100 

1110 

1 120 
Í 140 

::. 130 
1U0 
1 Í7& 
1 130 
T 

1 1 90 

-3 "0 



? DISPARE 

- 

UNE -X, Y).-- '110,60) 

sosüb imm 

L:MECX ? Y)--a2£, 113) 

LINE(X, Y)-; 110, 60) , í 

3DSUE- miW 

LIME : X,v)- (123, 95) 

LINEíX^Y)- (1-25. 113) , i 

20322 1210 

rm Lfí TO 500: NEXT- 

>-I-2:X,Y^ (123,95), 1 

3I-3LEíi25,?5),30 s 15.,,, j 

2GUND 7,62sS0UNB 8. 15 

*m 7~*Q m 220 S 322;:.2 0,3; NEX 

Fpf 2=0 72 13:3D2ND :.0;MEXT 
SCÜND 6. 'SiSOUND 7,7 




DE MAILING 



¡NOS APLICAMOS A SER UTILES! 

A TRAVES DE M$X CLUB DE MAILINC PUEDES ADOUIRIC 



BASIC TUTOR IDEALOCIC 



•III 



• ' ...... 



ADAPTADORES TARJETAS) 
INTELIGENTES 
BEE CARD Y SOFTCARD 



'Tnt m 



Deja el manual de lado, inserta este breviario de 
BASIC en cartucho y olvídate. No ocupa memoria. 

PVP 3.500 pts. 



ENVIA HOY MISMO ESTE CUPON 



1 Nombre y apellidos 

I Dirección 

I Población 

| □ Tutor Basic Ptas. 3.500- 



CP 



Prov. 



□ Sweet Acom Ptas. 5.200- 

□ Barn Stormer Ptas. 5.200- 



□ Adaptador Bee Card Ptas. 2.850 - 

□ Backgammon Ptas. 5.200- 

□ Chock'n Pop Ptas. 5.200,- 




Note quedes 
al margen 
y disfruta 
de las tarjetas 
inteligentes. 
lo último 
en soft. 



□ Adaptador Softcard Ptas. 2.850- 

□ Shark Hunter Ptas. 5.200,- 

□ Le Mans 2 Ptas. 5.200- 

I Gastos de envío por cada producto 1 00 - pts. Remito talón bancario de pts. a la orden de Manhattan | 

Transfer, S.A. Enviar a MSX CLUB de MAILING, Roca i Batlle 1 0-1 2 bajos - 08023 Barcelona. j 
^XC . 



CONCURSO DE PROGRAMAS 




740 L 
750 PRF 

^60 PKEV/ 
770 LI 

780 Iífí92/1#0R 1 S| TÍ) 10:LINE(95 
it».í5sa i ntn \*wri 



club 



de PROGRAMAS 



BASES 

1. Podrán participar todos nuestros 
lectores, cualquiera sea su edad. 

2. Los programas podrán ser envia- 
dos en cinta de cassette, debida- 
mente protegidos en su estuche de 
plástico, o en disco de 3 1/2 pulga- 
das. En este último caso se remitirá 
al participante un disco virgen en 
el momento de recibir el programa 
enviado. 

3. Todos los programas deberán lle- 
var la carátula adjunta, o bien foto- 
copia de la misma. 

4. Cada lector puede enviar tantos 
programas como desee. 

5. No se aceptarán programas ya pu- 
blicados en otros medios o plagia- 
dos. 

6. Los programas deben seguir las 
normas usuales de programación 
estructurada, utilizando líneas 
REM para marcar todas sus partes, 
subrutinas donde sean necesarias, 
etc. 

7. Todos los programas deben in- 
cluir las correspondientes instruc- 
ciones, lista de las variables utitili- 
zadas, aplicaciones posibles de 
programa y todos aquellos comen- 
tarios y anotaciones que el autor 

-considere puedan ser de interés 
para su publicación. 

PREMIOS 

8. Los programas serán premiados 
mensualmente, de modo acorde 
con su calidad, con un premio en 
metálico de 2.000 a 15.000 ptas. 

FALLO Y JURADO 

9. El Departamento de Programa- 
ción de MSX Club de Programas 



Remitir a: 



hará la selección de aquellos pro- 
gramas de entre los recibidos se- 
gún su calidad y su estructuración. 
10. Los programas seleccionados apa- 
recerán publicados en la revista 
MSX-Club de Programas, en la 
que se publicará, junto con el pro- 
grama, la cantidad con que ha sido 



premiado. 

11. Las decisiones del jurado serán 
inapelables. 

12. Los programas no se devolverán 
salvo que así lo requiera el autor. 

13. El plazo de entrega de los progra- 
mas finaliza el 1 de septiembre 
1988. 




club 



de programas I . MI PROGRAMA 



Roca i Batlle, 10-12, bajos 08023 Barcelona 



*í» I' hH»rl>«. l.lli o IW n|p,. P ,.|.,, 



FÜR Z=0 TO 13:S0UND Z,0:NEXT 

GOSUB 1900 

FF=1: GOSUB 1*350 

PAINT (99, 95) , 1 1 

GOSUB 1880 

FF=1:GOSUB1350 

FOR H=42 TG 1 STEP-2 

CIRCLE(125,95) ,H, 13, , , 1 

CIRCLE ( 125, 95) , 55-H, 1 , , , 1 

NEXT 

GOSUB 1900 

r 



jras 



Mov. cíe P 

Xl=125: Yl=95: X2=120: Y2=90: X3 

■0 



1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 

108: X4=140: Y3=l 15: Y4=130.: A= 
1360 FOR N=1TÜ2 
1370 FOR P=l TO 3 
1380 FOR J=0 TO 5 
1390 PUTSPRITE4, (XI, Yl) 
1400 PUTSPRITE5, (X2,Y2> , 
1410 PUTSPRITE6, (X3, Y3) , 14, 1+P 
1420 PUTSPRITE7, ( X4, Y4) 14, 6-P 
1430 PUTSPRITES, ( X4+9, X2+4) , 14, 1+P 
1440 PUTSPRITE9, ( X4+7, X2-6) , 6, 2+P 
1450 PUTSPRITE10, (Y2, Y4) , 15, 1+P 
1460 PUTSPRITE11, (Y4, X2-10) , 15, 1+P 
1470 PUTSPRITE12, < X3+6, Y2-4) , 1 5 , 2+ 
P 

14B0 PUTSPRITE13, ( X 1 - 10, Y2--4) , 6, 2+ 
P 

1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 



11, 1+P 
12, 1+P 



: "+7 



Xl=Xl-P+9: Yl-Yl- 
X2=X2+P+6: Y2=Y2-5 
X3=X3-12+3*P: Y3=Y3+P*2-9 
X4=X4-8: Y4=Y4+8 
NEXT 
NEXT 

IF FF=1 THENGOSUB 1 990 : RETURN 
L I NE (110 , 80 ) - ( 1 40 , 110) ,8,BF 
X 2= 1 20 : Y 1 =85 : X 1 = 1 1 : Y2=70 : X 3= 
100: X4=130: Y3=105: Y4=70 
1580 GOSUB 1900 
1590 NEXT 

1600 FORT=1TO90STEP9: PUTSPR.ITE4, (X 

1+T,Y1) , 11,3:PUTSPRITE5, (X2+T, Y2-T 

) , 12,3:PUTSPRITE6, (X3-T, Y3-T) , 1-4,5 

:PUTSPRITE7, (X4-T, Y4+T) ,15,2 

1610 PUTSPRITEB, ( X4- T, X2+T) , 14, 5: P 

JTSPRITE9, (X4-T,X2+T) , 6, 2 : PUTSPRIT 

EÍ0, (Y2, Y4-T) , 15, 4: PUTSPRITE1 1 , <Y3 

-T, X2+T) , 1S,4:PUTSPRITE12, (X3-T, Y2 

-T) , 15,5 

1620 NEXT , 

1630 FF=1: GOSUB 1990 

1 640 L I NE ( 60 , 40 ) ■- ( i 90, 190), 1 , BF 




> ESTRELLAS 
* ========= 



1650 GOSUB1670:GOTO 770 
1660 • 
1670 
1680 
1690 7 
1700 
1710 
1720 
1730 
1740 



FOR T=l TO150 
A=RND ( 1 ) *256 
B=RND ( 1 ) #192 
C=RND ( 1 ) *15 
PSET(A,B) ,C 
NEXT 
RETURN 



1 750 
1760 
1770 
1780 
1790 
1 800 
1810 
1820 
1830 
1840 
1850 
1860 
1870 
1880 
1890 
1900 
Z 

1910 

1920 
16 

1930 SOUND 12,56:S0UMD 13,0 



■ DISPARO LASER 

— ~ — ; ^ ~ — — — ™ ™ ~ ™ 'jz: 

? 

SOUND 7,62:SCUND8, 15 
FORZ=48TO112:SOUND0,Z:NEXT Z 
SOUND 8.0 

FOR Z=0 TO 13: SOUND Z,0:NEXTZ 
RETURN 



EXPLOSION 



FOR Z«0 TO 13: SOUND Z,0:NEXT 

SOUND 6,30:SOUND7,7 
SOUND 8, 16:S0UND9, 16:SOUND10, 
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El 



Programa 



•lt II niotif.. i. i |. o os n|M:e«.|.| 




1940 RETURN 

1950 ' 

1960 ' -BGRRA SPRÍTES 

1970 * =sr=:s=s==s==sssssss=ss==r = ss== szss.ssss 

J9S0 ? 





1990 


FGR I=2T013 






2000 


PUTSPRITEI, (255, 


192) , 


4 


20 1 


NEXT 






2020 


FF=0: RETURN 






2030 


CLS:KEYON: COLOR 


15,4,4: 


END 



Test de listados 



— 



10 


- 58 


20 


- 58 


30 


- 58 


40 


- 58 


50 


- 58 


60 


- 58 


70 


- 58 


80 


-236 


90 


- 36 


100 


- 20 


110 


- 53 


120 


- 58 


130 


58 


140 


- 58 


150 


-216 


160 


- 50 


170 


-226 


180 


-161 


190 


-240 


200 


- 77 


210 


- 58 


220- 


- 58 


230 






- 58 


240 


- 53 


250 


- B2 


260 


-176 


270 


._ TD 

w * 


2S0 


- 58 


290 


- 58 


300 


- 53 


310 


-249 


320 


- 193 


330 


-168 


340 


-119 


350 


-119 


360 


-229 


370 


-107 


380 


- 30 


390 


-130 


400 


-111 


410 


-194 


420 


-122 


430 


-134 


440 


-158 


450 


-111 


460 


- 2 




1620 
1630 
1 640 
1650 
1660 
1 670 
1680 
1 690 
1700 
1 7 1 

1730 
1740 
1750 
1760 
1770 
1 730 
1790 
1 800 
1810 
1820 
1830 



-131 

- 47 
-169 

-253 

- 58 

- 58 

- 58 

- 58 

- 85 

- 4i 

- 45 

- 49 
-131 
-142 

- 58 
~ 58 

- 53 

- 58 
-182 

- 14 

- 26 



1340 -125 



470 


-• 1 60 


700 


- 58 


930 


- 1 


1 160 


-104 


1390 


- 16 


1850 


-142 


480 


- 38 


710 


- 58 


940 


-192 


1 170 


-182 


1400 


- 20 


1860 


- 58 


490 


-195 


720 


- 29 


950 


-187 


1 180 


- 54 


1410 


~ 25 


1870 


- 58 


500 


-115 


730 


- 30 


960 


-192 


1 190 


- 35 


1420 


- 34 


1330 


-- 58 


510 


-167 


740 


~- 31 


970 


... 74 


1 200 


-127 


1430 


- 43 


1 890 


~ 53 


520 


-112 


750 


— t '-y 


980 


-198 


1210 


- 35 


1440 


- 40 


1 900 


-125 


530 


-164 


760 


-114 


990 


-115 


1 220 


- 14 


1 450 


- 29 


1910 


-142 


540 


-170 


770 


-162 


1 000 


- 57 


1 230 


-173 


1460 


- 40 


1 920 


-237 


550 


-- 73 


780 


- 75 


1 1 


-216 


1240 


- 98 


1470 


- 45 


1930 


-169 


560 


- 7 


790 


- 58 


1020 


- 58 


1250 


-250 


1480 


~ 40 


1940 


-142 


570 


-173 


300 


- 58 


1030 


- 58 


1260 


-173 


1490 


-214 


1 950 


- 58 


580 


-251 


810 


- 58 


1040 


- 58 


1270 


-190 


1500 


-147 


1960 


- 58 


590 


- 92 


820 


- 58 


1 050 


- 58 


1 280 


-133 


1510 


-238 


1970 


- 58 


600 


-180 


830 


-115 


1060 


- 20 


1290 


-179 


1520 


- 95 


1980 


- 53 


610 


-176 


340 


•—252 


1070 


-180 


1300 


-131 


1530 


-131 


1 990 


-194 


620 


-147 


850 


- 92 


1080 


- 88 


1310 


- 14 


1540 


-131 


2000 


-204 


630 


- 98 


860 


-254 


1090 


- 82 


1320 


- 58 


1550 


- 34 


2010 


-131 


640 


-150 


870 


- 54 


1 1 00 


-180 


1-330 


- 58 


1560 


-136 


2020 


- 84 


650 


- 62 


880 


- 79 


1110 


- 70 


1340 


- 58 


1570 


-244 


2030 


-140 


660 


-177 


890 


- 78 


1 120 


-150 


1350 


-244 


1580 


- 14 






670 


- 61 


900 


- 82 


1130 


-180 


1360 


-189 


1590 


-131 






680 


-197 


910 


- 84 


1 140 


-118 


1370 


-192 


1600 


- 61 


TOTAL: 


690 


- 58 


920 


- 4 


1150 


-132 


1380 


-187 


1610 


-170 


21636 
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ROMPECABEZAS 



.Por Alberto Rodríguez» 

Debes encender todas las fa- 
rolas de la calle; pero siguiendo 
unas normas muy estrictas. Sólo 
puedes encender una farola si la 
anterior está encendida y las de- 



más apagadas. Algo similar ocu- 
rre a la hora de apagarlas. Acep- 
ta el reto de las farolas. 




10 ' ROMPECABEZAS 
20 REM 
30 ' MSX 
40 ' 

50 9 Alberto Rodríguez 
60 ' 

70 CLS: COLOR 5. 1,4 
80 ' DIBUJAR PANTALLA 
90 DIM L (9) : CC=0 
100 FOR 1=1 TO 9 
110 L(I)=0 
120 NEXT I 

130 OPEN"GRP: "FOR OUTPUT AS #1 
140 SCREEN 2,0,0 



150 COLOR 4, 1,4: 
160 READ XI, Yl 
170 FOR ZZ=1 TO 31 
1S0 READ X2,Y2 
190 LINE (XI, Y1)-(X2,Y2) 
200 X1=X2: Y1=Y2 
210 NEXT ZZ 

220 DATA , 50 , 20 , 50 , 20 ,37,45,37,45, 
70,55,70, 60 , 60 , 65 , 60 , 65 , 50 , 70 , 50 , 70 
,60,80,60,80,95,90,30, 11^,30, 125,95 



, 12 

s 17 

230 

0,2 

240 

250 

260 

270 

280 

290 

300 

310 

320 

330 

340 

350 

360 

370 

380 

390 

400 

410 

420 

430 



5,50, 130,50, 140,40, 155.55, 155,65 
5,65, 175,45, 195,45 

DATA 195, 55, 205, 55, 215, 25, 220, 4 
40, 40, 245, 50, 245, 65, 255, 65 

PAINT (0,0), 4, 4 

FOR 1=28 TO 228 STEP 25 

CIRCLE ( I , 175) ,5 

LINE (1-2, 115)-<I~4, 171) 

LINE(I+2, 115)-<I+4, 171) 

LINE (1-4, 179) -(1-8, 188) 

LINE (1+4, 179) -(1+8 1 188) 

LINE(I-4, 182)-(I+4, 182) 

LINE (1-6, 185) -(1+6, 185) 

LINE (1-8, 188) -(1+8, 188) 

LINE (1-7, 103) -(1+7, 103) 

LINE(I-5,96)-(I+5,96) 

LINE(I-5,'96)-(I-7, 103) 

LINE (1+5, 96) -(1+7, 103) 

PAINT ( I , 100) ,4,4 

CIRCLE (I, 108) ,7 

CIRCLE ( I , 108) ,4, 10 

NEXT I 

CIRCLE (190, 20) ,11, 10,4. 1 , 1 . 65 
CIRCLE (186, 19) , 10, 10,4.3, 1.4 
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440 PAINT<198,20) , 10, 10 
450 FDR ZZ=0 TO 25 
460 READ YY 
470 PSET(ZZ*10,YY> , 10 
480 NEXT 

490 DATA 10,0, 18, 15,2, 10,40,28, 1, 17 

,20, 1,5,26,35,8,48, 14,6,40,37,0,20, 

34,5,39 

500 COLOR 15 

510 FOR 1=1 TO 9 

520 PSETÍ 1*25-7, 172) , 1 



Test de listado 



570 



530 PRINTttl, I 
540 NEXT I 

550 DRAWBM90, 00" : PRINTttl , "FAROLAS" 
560 * PROGRAMA PRINCIPAL 
570 A*=INKEY*:IF A*="" THEN 570 
580 IF ASC<A*)<49 OR ASC(A*)>57 THE 
N 570 

590 CC=CC+1 :LINE (83, 60) -( 154,66) , 1, 
BF : DRAW " BM83 , 60 " : PR I NT# 1 , CC ,- " VECES " 
600 N=VAL(A*) 
610 IF N*=l THEN 670 
620 IF L<N-1)=0 THEN 
630 IF N=2 THEN 670 
640 FOR ZZ=1 TO N-2 
650 IF L(ZZ)=1 THEN 570 
660 NEXT ZZ 

670 IF L(N)=0 THEN RAI NT < NK25+3 , 108 

) , 10, 10: GOTO 700 

680 CIRCLE(N*25+3, 108) ,3, 1 

690 PAINTCN*25+3, 108) , 1, i 

700 L(N)=1-L<N) 

710 IF L(l)+L<2)+L<3)+L(4)+L<5)+L(6 

)+L(7)+L(8)+L(9)=9 THEN 740 

720 GOTO 570 

730 9 FIN DEL JUEGO 

740 DRAWBM10, 71 " : PRINT#1 , "TODAS LA 
S FAROLAS ENCENDIDAS! " 
750 I F CC< 34 1 THENDRAW " BM70 , 82 " : PR I 
NTtt 1 , "TRABAJO PERFECTO ! " : GOTO 780 
760 IF CC>341 AND CC<360 THEN DRAW" 
1, "BUEN TRABAJO " : GOTO 



70, 
780 
770 
780 



PRINTttl, "PODIA ESTAR MEJOR " 
DRAWBM65, 140" : PRINTttl , "OTRA PA 
RTIDA (S/N) ?" 

790 A*=*INKEY*: IF A*="" THEN 790 
800 IF A*=»"N" THEN END ELSE IF A*= M 
S" THEN RUN ELSE 790 






10 


- 58 


130 


-177 


250 


-181 


370 


- 34 


490 


-105 


610 


- 98 


730 - 58 


20 


- 


140 


- 82 


260 


-130 


380 


-122 


500 


-219 


620 


-158 


740 - 72 


30 


- 58 


150 


- 42 


270 


-117 


390 


- 65 


510 


-191 


630 


- 99 


750 -167 


40 


- 58 


160 


-198 


280 


-115 


400 


-131 


520 


-166 


640 


- 99 


760 -184 


50 


- 53 


170 


- 62 


290 


-204 


410 


-204 


530 


- 59 


650 


- 1 


770 -159 


60 


- 58 


180 


-200 


300 


-202 


420 


-127 


540 


-204 


660 


- 55 


780 -200 


70 


- 43 


190 


-195 


310 


-196 


430 


-123 


550 


-254 


670 


-142 


790 -158 


80 


- 58 


200 


- 64 


320 


-206 


440 


-190 


560 


- 58 


680 


-160 


800 -131 


90 


-253 


210 


- 55 


330 


-216 


450 


- 55 


570 


-193 


690 


-164 




100 


-191 


220 


-186 


340 


- 44 


460 


- 57 


580 


-160 


700 


-201 




110 


-230 


230 


- 32 


350 


- 26 


470 


-246 


590 


-219 


710 


- 53 


TOTAL: 


120 


-204 


240 


-224 




- 36 


480 


-131 


600 


-134 


720 


-211 


10473 
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Program 



GUSANILLO 



Por F.R. Miret, 



Debes conducir al gusano 
loco para que llegue a su comida 
sin chocar con las numerosas 
rocas que obstruyen su camino. 
El juego presenta una dificultad 
progresiva y puede llegar a ser 
un verdadero reto el conseguir 
pasar de pantalla. 



*************** 



GUSANILO 
F.R. Miret 



*************** 



THEN 110 



:KEY OFF 



1991:READ Q: VPOKE 



10 
20 

30 
40 
50 
60 
70 
80 
90 ' 

100 DEFINT A--Y 
110 IF PLAY(1>=~1 
120 DIM A < 105) 
130 SCREEN 
140 WIDTH 3 
150 N1=1:N2=1 
160 0*<t)*"BAJA" 
170 B*(2)="MEDIA" 
180 B$ (3) --"ALTA" 
190 V=5 
200 V1=V 
210 COLOR 4,1, 1 
220 FOR 1=1976 TO 
I,Q:NEXT 

230 FOR 1=336 TO 343:READ Q: VPOKE I 
, Q: NEXT 

240 FOR 1=1440 TO 1447:READ Q: VPOKE 
I , Q: NEXT 

250 FOR 1=1320 TO 1327: RE AD Q: VPOKE 
I,Q:NEXT 

260 VFOKE B223, 225: VPOKE 8222,161 
270 VPOKE 8212, 193 
280 VPOKE 8197,97 

290 PRINT" * * 8 GUSANILOCO * * 

*": PRINT 

300 PRINT: PRINT: PRINT "INTENTA COMER 
TE TODAS LAS ñ SIN CHOCARTE CON UNA 

* NI CON TU °" 
310 PRINT: PRINT: PRINT "HA Y 3 PANTALL 
AS Y 3 VELOCIDADES " 

320 PRINT: PRINT"PARA EMPEZAR TIENES 
5 VIDAS " 

330 PRINT: PRINT: PRINT" PERO PUEDES C 
ONSEGUIR BONIFICA- CION POR COGER T 
ODAS LAS ñ SIN PEGARTr' 



340 PR I NT : PR I NT : PR I NT : PR I NT » 



PULSA UNA TECLA " 

350 IF INKEY*<>" " THEN 350 

360 R=RND ( 1 ) : A*=INKEY$: IF A*="" THE 

N 360 

370 CLS 

380 FOR 1=6144 TO 6175: VPOKE 1,180: 
VPOKE 1+736, 180: NEXT 
390 FOR 1=6144 TO 6911 STEP 32 
400 VPOKE I , 180: VPOKE 1+31,180 
410 NEXT 

420 FOR 1=1 TO 24 
430 R=INT (RND ( 1 ) *700) +6 
440 IF VPEEK(R>>32 THEN 430 ELSE VP 
OKE R, 165 
450 NEXT 

460 FOR 1=1 TO 10*N1 

470 R=INT (RND < 1 ) *700) +6208 

480 IF VPEEK(R)>32 THEN 470 ELSE VP 

OKE R,42 

490 NEXT 

500 X=6177 

510 D=0:D1=0 

520 E=100 

530 F=99 

540 Y=0: VPOKE X,247 

550 FOR 1 = 1 TO- 5* (3-N2) : D=STICK ( 1 ) + 

STICK(0):IF D=0 OR D=D1 THEN NEXT 

560 IF D=0 THEN D=D1 

570 IF D=0 THEN 540 

580 IF D=l THEN Y=-32 

590 IF D=5 THEN Y=32 

600 IF D=3 THEN Y=l 

610 IF D=7 THEN Y=-l 

620 IF Y=0 THEN 540 

630 IF VPEEKÍX+Y) >32 THEN GOSUB 710 

640 A (F) =X: F=F-1 

650 VPOKE X,248:X=X+Y 

660 VPOKE A <E) , 32: E=E- 1 

670 D1=D 

680 IF F<5 THEN F=100:B=B+1 
690 IF E<5 THEN E=100 
700 GQTO 540 

710 IF VPEEK(X+Y)»165 THEN BEEP: E=E 

+NliN-N+l:IF N>23 THEN 960 

720 IF VPEEK<X+Y)=180 THEN BEEP:Y=0 
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: RETURN 700 

730 IF VPEEK<X+Y)=243 THEN BEEP:Y=0 
: RETURN 760 

740 IF VPEEK(X+Y>=42 THEN BEEP:Y=0: 
RETURN 760 
750 RETURN 

760 IF F>E THEN K=F:F=5 

770 J=96: V=V-1 

780 FOR I=E TO F STEP -1 

790 VPOKE A ti 5 , 32 
800 J»J-1 

810 PLAY"T255L64N=J; " 

820 IF PLAY(1)=-1 THEN 820 

830 NEXT 

840 IF I<5 THEN F=K: E= 100: GGTÜ 7B0 
850 G=0 

860 FOR 1=1 TO 9 

870 B < I ) =VPEEK ( 6599+1 ) 

880 NEXT 

890 LOCATE 8,14:PRINT" VIDAS" ; V 
900 FOR 1=1 TO 1500: NEXT 




910 IF V<1 THEN BEEP: PLAY"CDDCDEEFF 

EGABA" : RUN 

920 FOR 1=1 TO 9 

930 VPOKE 6599+ I,B (I) 

940 NEXT 

950 E=100: F=99: VPOKE X, 32: GOTO 500 
960 VPOKE X, 248: VPOKE X+Y,247 
970 PLAY"T255L64ABBA" 
980 N1=N1+1 

990 IF Nl>3 THEN N1=1:N2=N2+1 
1000 IF N2>2 THEN N2=3 
1010 N=0 

1020 LOCATE 6,10:PRINT" PANTALLA NU 
MERO"; NI 

1030 LOCATE 6,12:PRINT" VELOCIDAD " 
;B*(N2) 

1040 LOCATE 8,14:PRINT" VIDAS" ; V 
1050 IF V1=V THEN LOCATE 6,16:PRINT 
" + BONIFICACION « :V=V+1 
1060 V1=V 

1070 FOR 1=1 TO 5000: NEXT 

1080 CLS 

1090 GOTO 380 

1100 DATA 65,93,62,107,127,119,54,2 
8 

1110 DATA 60,118,223,237,255,215,12 
6,60 

1120 DATA 24,120,252,218,190,126,10 
8,48 

1130 DATA 81,146,164,127,254,75,146 
, 148 

1140 DATA 130,214,254,214,146,24,48 
, 16 



Test de listado i 





- m 


190 


- 91 


370 


-159 


550 


-239 


730 


- 8 


910 


- 56 


1090 - 20 


20 


- 58 


200 


-204 


380 


-214 


560 


- 81 


740 


- 58 


920 


-191 


1100 -151 


30 


- 58 


210 


- 78 


390 


-214 


570 


-213 


750 


-142 


930 


- 4 


1110 - 30 


40 


- 58 


220 


-237 


400 


- 85 


580 


-243 


760 


-227 


940 


-131 


1120 - 29 


50 


- 58 


230 


- 9 


410 


-131 


590 


- 5 


770 


-129 


950 


'-) l ~,cr 


1130 - 48 


60 


- 58 


240 


-177 


420 


-204 


600 


- 6 


780 


-254 


960 


- 37 


1140 -233 


70 


- 58 


250 


-193 


430 


- 50 


610 


-252 


790 


-220 


970 


-177 




80 


- 58 


260 


- 51 


440 


- 44 


620 


-234 


800 


-135 


980 


-240 




90 


- 58 


270 


—242 


450 


-131 


630 


- 79 


810 


-187 


990 


-146 




1 00 


- 56 


280 


-131 


460 


- 48 


640 


-216 


820 


-193 


1 000 


-105 




110 


-248 


290 


- 94 


470 


- 50 


650 


-116 


830 


-131 


1 1 


- 78 




120 


-144 


300 


-198 


480 


-217 


660 


-143 


840 


-245 
- 71 


1020 


- 32 




130 


-200 


310 


-207 


490 


-131 


670 


-168 


850 


1030 


- 66 




140 


-175 


320 


- 76 


500 


-156 


680 


- 9 


860 


-191 


1040 


- 81 




150 


- 59 


330 


-135 


510 


-243 


ó 90 


... e7 


870 


-233 


1050 


-225 




160 


- 10 


340 


- 8 


520 


-167 


700 


-181 


880 


-1.31 


1060 


-204 




1 70 


- 93 


350 


-224 




-167 


710 


- 15 


890 


- 81 


1 070 


- 25 


TOTAL: 


180 




360 








720 


-136 




- 9S 




— 159 
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MUSIC MODULE 



- 



,Por Willy Miragall, 



LA MUSICA 
EN LA PUNTA DE 

TUS DEDOS 



De todos son conocidas las ex- 
celentes capacidades sonoras de 
los MSX. No contentos con 
ellas, los técnicos de Philips han 
desarrollado el MUSIC MO- 
DULE, uno de los periféricos 
más espectaculares entre los 
MSX. 



— 







El MUSIC MODULE es un di- 
vertido instrumento musical 
que se pone al alcance de los 
usuarios de MSX. Destaca por su sor- 
prendente facilidad de uso. Por prime- 
ra vez nos encontramos con un instru- 
mento que no precisa de ningún cono- 
cimiento musical para su uso, siendo a 
la vez un interesante aparato para los 
introducidos en el mundo musical. 
Con el MUSIC MODULE podrás 



componer e interpretar todo tipo de 
melodías, desde clásicos hasta los te- 
mas pop de más rabiante actualidad, 
acompañado por un fondo musical de 
cinco instrumentos independientes 
aue lo convierten en el primer módulo 
de bajo coste que permite esta posibili- 
dad. 

Pero MUSIC MODULE no es sólo 
un sintetizador excepcional. Incorpora 
también un dispositivo de muestreo de 



sonido gracias al cual se puede digitali- 
zar cualauier sonido y modificarlo 
creando de este modo erectos especia- 
les hasta ahora veteados a los especia- 
listas en sonido. 

Encontramos también en este inte- 
resante aparato un interfaz MIDI, que 
permite conectarlo a los instrumentos 
musicales que cuenten con el mismo, 
pudiendo llegar a controlar 6 instru- 
mentos diferentes simultáneamente. 
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MUSIC MODULE 

En el estuche en que se comercializa 
este módulo musical encontramos, 
aparte de dicho módulo, dos manuales 
(uno de funcionamiento y otro de in- 
troducción a la notación musical -no- 
tas, partituras, etc.-) y una cinta de cas- 
sette. En esta cinta se encuentran una 
amplia variedad de sonidos para poder 
generar efectos especiales, así como 
instrumentos, que podremos digitali- 
zar y utilizar con el MUSIC MODU- 
LE. 

Exteriormente el módulo tiene la 
apariencia de un cartucho de juegos de 
gran tamaño (como un controlador de 
disco) plagado de contactos y conexio- 
nes a todo su alrededor. Demos un rá- 
pido repaso a las conexiones que incor- 
pora este aparato. 

Viendo el aparato de frente, y empe- 
zando por la derecha, encontramos los 
tres conectores MIDI (Midi IN, OUT y 
THRU) que permiten interconectar el 
módulo con otros instrumentos musi- 
cales. De estos conectores y su utiliza- 



ción hablaremos más adelante. 

Encontramos también dos conecto- 
res de salida audio para aparatos de 
alta fidelidad u otros aparatos que utili- 
cen sus mismas conexiones. 

En la parte izquierda del módulo hay 
dos conectores de entrada, uno para el 
micrófono externo (el módulo incor- 
pora uno en su propia carcasa) y otro 
para entrada de audio procedente de 
un aparato de alta fidelidad o cualquier 
otro aparato con la salida apropiada. 
Existe también, junto a estas conexio- 
nes, una entrada para conectar un te- 
clado externo opcional. Gracias a este 
teclado podremos interpretar con el 
MUSIC MODULE de forma similar a 
como lo haríamos con un sintetizador 
convencional. 

Y finalmente encontramos la abertu- 
ra del micrófono que incorpora el MU- 
SIC MODULE para la síntesis de soni- 
do y el potenciómetro que ajusta el vo- 
lumen del mismo. 

Como se puede apreciar, en el aspee- , 
to «conexiones» no se echa a faltar 
nada importante, ya que puede, gracias 
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al coniunto de conectores que incorpo- 
ra, relacionarse con cualquier tipo de 
instrumento o electrodoméstico musi- 
cal. 



CONECTEMOS EL MUSIC 
MODULE 

El MUSIC MODULE se conecta a 
nuestros MSX como lo haría cualquier 
cartucho de juegos. Tras conectar el 
módulo con el ordenador apagado 
procedemos a conectar este último. 

A los pocos segundos aparece ante 
nosotros la pantalla del MUSIC MO- 
DULE y si tenemos el volumen de 
nuestro televisor algo alto podremos 
oír uno de los 20 ritmos preprograma- 
dos que incluye el módulo en su reper- 
torio musical. 

La pantalla del MUSIC MODULE, 
aunque presenta cuatro recuadros di- 
ferenciados, debemos dividirla en dos 
zonas. La parte superior corresponde 
al pentagrama y al conjunto de notas y 
símbolos que en él podemos utilizar. 
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MUSIC MODULE, 

■ . 

La parte inferior de la pantalla co- 
rresponde a la zona de menús con la 
que podemos controlar la totalidad del 
programa. 

En principio, en esta zona encontra- 
mos el menú de melodía. Desde este 
menú podemos grabar una melodía to- 
cada por nosotros en la memoria del 
ordenador, reproducir una melodía 
anteriormente grabada, cambiar el tipo 
de acompañamiento, el tempo -veloci- 
dad a la que se interpreta la melodía-, y 
el volumen del instrumento que este- 
mos tocando en este momento. 

Existe además la posibilidad de con- 
mutar entre modo profesional o modo 
aficionado. En este último modo (en el 
que se encuentra el aparato al conectar 
el ordenador), sea cual sea la nota que 
toquemos en el teclado de nuestro 
MSX, el MUSIC MODULE encontra- 
rá la armonización adecuada con lo 
que, toquemos lo que toquemos, siem- 
pre sonará bien. 

Gracias a esto, y con sólo seguir el 
ritmo del acompañamiento, podremos 
interpretar a nuestro gusto, sin miedo a 
desafinar. El efecto es, por lo demás, 
muy logrado, ya que suenan simultá- 
neamente 5 instrumentos -el acompa- 
ñamiento- además del elegido para to- 
car la melodía pulsando las teclas de la 
segunda fila de nuestro MSX. 

Cabe resaltar que el módulo incor- 
pora 20 acompañamientos a cinco ins- 
trumentos más batería gracias a los 
cuales cualquier melodía que toque- 
mos, por sencilla que ésta sea, parecerá 
trabajo de músicos profesionales. Hay 
que decir que los mejores resultados 
sonoros se obtienen cuando el MUSIC 
MODULE se conecta a un equipo de 
alta fidelidad. 

Siguiendo con los acompañamien- 
tos, citamos a continuación algunos de 
los más interesantes: CLASICO, DIS- 
CO, ROCK & ROLL, REAGAE, 
ARABE, INDIO, ESPAÑOL, ESCO- 
CES, HUNGARO, LATINO, 
SWING, FUNKY, y un largo etcétera 
que recorre los estilos musicales de un 
gran número de países y épocas dife- 
rentes. 

MAS MENUS 

En la parte inferior derecha de la 
pantalla aparecen 10 figuras. Cada una 
de estas figuras representa un menú 
como el de melodía del que acabamos 
de hablar. Para acceder a estos menús 
sólo hemos de dirigirnos a ellos con un 
ratón o bien con las teclas de control 
del cursor y pulsar el espacio. 



* Menú de instrumentos: Desde 
este menú podemos modificar cual- 
quiera de los cinco instrumentos que 
forman cada uno de los acompaña- 
mientos, así como el instrumento con 
el que tocamos la melodía de entre un 
total de 60 instrumentos diferentes. En 
la tabla adjunta incluimos la lista de los 
instrumentos accesibles desde el MU- 
SIC MODULE. 

* Menú de control de volúmenes: 

Con este menú podemos subir o bajar 



el volumen de cada uno de los seis ins- 
trumentos que pueden llegar a sonar si- 
multáneamente, así como el de la bate- 
ría que acompaña a cada uno de los rit- 
mos preprogramados. 

Menú de batería: Podemos, a tra- 
vés de él, modificar el sonido de la ba- 
tería entre 10 tipos diferentes. Pode- 
mos además tocar manualmente la ba- 
tería con las teclas del teclado. Hemos 
de decir que la calidad sonora de la ba- 
tería no es, ni mucho menos, compara- 



La conexión del MUSIC MODULE a nuestros MSX se realiza de igual forma que con un cartucho 
ROM. 




Observamos en esta foto los tres conectores MIDI (IN, OUT, y THRU) y las dos salidas HI-FI. 




En esta foto las conexiones de entrada HI-FI, el potenciómetro del micrófono y el conector del tecla- 
do opcional. 



1 


1 








..... 
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son los menús de efectos especiales, di- 
gitalización de sonidos y MIDI. 

EFECTOS ESPECIALES 

Una de las opciones más sorpren- 
dentes de este módulo es que incorpo- 
ra un generador de efectos especiales. 
Gracias a esto podemos generar, en 
tiempo real, varios interesantes efectos. 

* ECO: Cuando seleccionamos la 
opción eco a todos los sonidos que lle- 
guen al MUSIC MODULE, bien por 
medio de su micrófono incorporado o 

Observamos en esta foto la pantalla de control del MUSIC MODULE y en la parte inferior izquier- 
da el menú de melodía. ^ 



ble a la calidad sonora del resto de los 
efectos e instrumentos. 

* Menú de disco/cinta: Gracias a 
este menú podemos grabar en cinta o 
disco tanto las melodías que hayamos 
generado como los sonidos digitaliza- 
dos por el MUSIC MODULE. El mó- 
dulo detecta por sí mismo si tenemos o 
no conectada una unidad de disco. Se- 
gún dispongamos o no de esta unidad 
aparecerá el menú de disco o el de 
cinta. 

Existen además otros tres menús de 
los que hablaremos a continuación: 



En la parte inferior izquierda de la pantalla se encuentra el menú de volúmenes, que nos permite mo- 
dificar los de cualquier instrumento. 
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bien por la entrada de alta fidelidad si 
ésta está conectada, se les añadirá un 
eco que podemos variar entre 25 mili- 
segundos (una escasa reverberación) y 
1.25 segundos (eco extremadamente 
lejano). 

También podemos modificar el tono 
de los sonidos que llegan al micrófono 
sin variar su velocidad. Gracias a este 
efecto podemos conseguir desde voces 
tipo "Darth Vader" de "La Guerra de 
las Galaxias" hasta voces tipo "Pitu- 
fos" o cualquier otro cambio de tono 
que se os pueda ocurrir. 

Estas modificaciones al sonido (tan- 
to el eco como el cambio de tono) son 
llevadas a cabo por el módulo en tiem- 
po real. Es decir, podemos hablar por 
el micrófono y los cambios se oirán ins- 
tantáneamente en la salida, bien del te- 
levisor, bien de un equipo de alta fideli- 
dad. 

Como inconveniente hemos de decir 
que no se pueden utilizar ambos efec- 
tos al mismo tiempo, y que tampoco se 
pueden grabar estos efectos en la me- 
moria del MUSIC MODULE para uti- 
lizarlos más adelante. Tampoco se pue- 
den utilizar los efectos mientras este- 
mos tocando una melodía. 

* DIGITALIZADOR DE SONI- 
DOS: En este menú observamos, en 
primer lugar, una barra móvil en la par- 
te inferior de la pantalla. Esta barra 
mide el nivel de sonido del micrófono 
de entrada. Con el potenciómetro que 
incorpora el MUSIC MODULE pode- 
mos variar el volumen de entrada hasta 
hacer que los sonidos alcancen un nivel 
adecuado. 

Una vez hecho esto podemos pasar a 
grabar en la memoria del MUSIC MO- 
DULE cualquier sonido que se capte 
por la entrada del micrófono, con una 
duración máxima de 4.6 segundos, o 
bien grabar 4 sonidos diferentes de 
hasta 1.15 segundos de duración. 

Pese a ser poco tiempo, es suficiente 
para poder almacenar los más intere- 
santes efectos especiales, sonidos, fra- 

^ndo" 38 (Una ° ^ paJabr3S P ° r SC " 
Una vez digitalizados podemos va- 
riar el tono de los efectos especiales 
(más agudos o más graves) y podemos 
utilizarlos, a partir de este momento, 
como uno más de los instrumentos uti- 
lizados en el MUSIC MODULE. De 
esta forma, en el momento en que lo 
deseemos, y con sólo pulsar una tecla, 
podremos hacer que se introduzca en 
la melodía el ruido de cristales rotos, 
un ladrido, o una palabra a la cual pre- 
viamente hemos podido variar de tono. 

Una de las facetas más interesantes 
de este menú es esta última que acaba- 
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MUSIC MODULE, 



SONIDOS 

SINTETTZADOR I 
SINTETIZA DOR 2 
SINTETTZADOR LEAD 
SINTETTZADOR SWEEP 
SINTETTZADOR BAJOS 
! Nll NTIIOSO 
•WAYOUT- 
SONIDO SIMPATICO 
AJENO 
CAMPANA 
CAMPANILLA 
RUIDOSO 
SPACEBELL 
PUNKSTRINC 
SITAR 

GUITARRA E 
GUITA 
GUITARRA/ 
BANJO 
ARPA 
BIRIMBAO 

BAJO GOLPEADO 
BAJO ELECTRICO 
BAJO RASCADO 
GLOCKENSPIEL 
KOTO 
MARIMBA 
XILOFONO 
VTBRAFONO 

SEEL DRUMS (TAMBOR DE 
" ATA) 



COBRES CON SORDINA 

CUERDAS PUNTEADAS 

VIOLIN 

SAXOFON 

CLARINETE 

FLAUTA TRAVESERA 

OCTAVIN 

FLAUTA 

OBOE 

FAGOT 

ARMONICA 

GAITA 

PIANO 

PIANO ELECTRICO I 
PIANO ELECTRICO 2 
PIANO JUGUETE 
CLAVICORDIO 
CELESTA 
ACORDEON _ 
ORGANO DE CANONES 
ORGANO ELECTRICO 1 
ORGANO ELECTRICO 2 

MUESTRA BREVE I 
MUESTRA BREVE 2 

!3 
¡4 



TROMPA 



CUERNO 
TUBA 

COBRES CON WAH WAI1 




COUNTRY 

WALTZ 

EURORAP 

ROCK'nTUJLL 

REGGAE 

SCOTTTSH 

ARABIA N 

INDIAN 

LATIN 

DISCO 

SPANISH 

(HINCARIAN 

APENDICE 1 

AUDIO SAMPLE TAPE 

LADO I 

SONIDOS NO MUSICALES 

BOCINA DE COCHE 

LADRIDO CHILLON 

LADRIDO DE PERRO 

MUGIDO 

MUGIDO BREVE 

GANSOS 

ELEFANTE 

TIGRE 

JUNCIA 

AMETRALLADORA 

NEUMATICOS CHIRRIANDO 

ZUMBIDO DEL BOING 

BOTELLA DE CHAMPAÑA 

DESTAPADA 

WOW DE BAJO/ONDA 

COSMICA 

5 BEN" (CAMPANA! 



TA X 

AVES TROPICALES 

GRir 



ORCHESTRAL STAB I 
BRASS SUDE DOWN 
BRASS SUDE UP 
GUITARRA ACOUSTTCA 
GUITARRA de ROCK 
FUZZ CUITAR 
COROS de GUITARRA 
ELECTRICA I 
COROS DE GUITARRA 
ELECTRICA O 
ACOUSTIC DOUBLE BASS 
CHOIR 
WOWSINTH 

INDIAN SITAR . TABLA RIFF 

MAJESTIC ORGAN 

GONG 

TIMPANI 

KIT DRUMS 

TOM 

SNARE 

BASS DRUMS 

CRASH CYMBAL 

HIT HAT 
DOW SYNTH ESLZER 
XILOPONO 
SLAP BASS HI 
SLAP BASS LOW 
PIANO 

PIANO 1 NOTE BASS 
PIANO J STAB REVER B 
HONKY TONK PIANO 
SAXOPHONEGROWL 

STAB I 

SMOOTH 

STAB n 
ORCHESTRAL STAB D 



He aquí la lista de instrumentos que pueden ser utilizados directamente con MUSIC MODULE. 



mos de comentar. Gracias a ella pode- 
mos introducir en el MUSIC MODU- 
LE el sonido de un piano, por ejemplo, 
y dado que podemos utilizar este soni- 
do como uno más de los del módulo, 
dispondremos de una síntesis de soni- 
do de piano de un modo sencillo y rápi- 
do. De igual forma podemos sintetizar 
cualquier sonido que deseemos. 

Es por ello muy de agradecer que 
junto al MUSIC MODULE se entre- 
gue una cinta que contiene los sonidos 
de 35 instrumentos diferentes, que po- 
dremos añadir a los que incorpora el 
módulo. Se encuentran grabados en 
esta cinta, de igual forma, una serie de 
efectos especiales: gritos de personas y 
animales, bocinas, frenazos, y toda una 
serie de efectos para nuestras composi- 
ciones musicales. 

Como punto negativo podemos citar 
el que la calidad de la digitalización no 
sea todo lo buena que debiera ser, in- 
cluso si el sonido procede de un equipo 
de alta fidelidad o de un avanzado sin- 
tetizados 

* INTERFAZ MIDI: Gracias a este 
menú podemos comunicar al MUSIC 
MODULE con toda una extensa serie 
de instrumentos musicales. En particu- 
lar todos aquellos que utilicen la tecno- 
logía MIDI. Entre estos podemos citar 
todo tipo de sintetizadores, pianos, ba- 
jos, guitarras y baterías electrónicas. 

El MUSIC MODULE puede con- 
trolar un instrumento polifónico que 
permita 6 sonidos diferentes simi 
neamente (en el caso de este banco i 
pruebas un sintetizador polifónico) o 



bien hasta 6 instrumentos 
eos. 

Aparte de las opciones conectadas, 
este menú permite conectar o desco- 
nectar la transmisión vía MIDI e indi- 
carle al MUSIC MODULE si se halla o 
no conectado el teclado opcional PHI- 
LIPS para el módulo. Gracias a este te- 
clado podremos realizar con los soni- 
dos del módulo acordes de hasta 9 no- 
tas simultáneas. 

Respecto a las conexiones MIDI de- 
bemos avisar que, si bien el módulo 
cuenta con la entrada MIDI IN, esta no 
es reconocida por el aparato, y sólo tie- 
ne razón de serpor la existencia de la 
toma MIDI THRU, que permite 
"reenviar" a otros instrumentos la se- 
ñal recibida por medio del MIDI IN. 

PARTITURAS CON MUSIC 
MODULE 

Hasta ahora hemos estado hablando 
de los menús situados en la mitad infe- 
rior de la pantalla del MUSIC MODU- 
LE. En la parte superior, en todo mo- 
mento, existe una partitura (con dos 
pentagramas, en clave de sol y de fa) en 
la cual podemos insertar de un modo 
muy sencillo con las teclas del cursor 
todas las notas, silencios, etc., que que- 
remos que compongan nuestra melo- 
día. Gracias a la opción PLAYBACK 
del menú de melodía podemos hacer 
que el módulo interprete la partitura 
que hayamos entrado, 
trado. 

De nuevo citando las limitaciones 
del módulo hemos de decir que en la 



partitura no nos es posible entrar acor- 
des, como tampoco nos es posible ha- 
cerlo desde el teclado del ordenador. 

La operación inversa, es decir, visua- 
lizar la partitura de las notas tocadas 
desde el teclado es también fácilmente 
accesible, ya que se realiza de forma au- 
tomática al grabar una melodía. Des- 
graciadamente no existe ninguna op- 
ción que permita volcar las partituras 
por impresora. 

MANUALES 

Con el MUSIC MODULE se sumi- 
nistran dos manuales. El primero es 
una guía en varios idiomas -incluido el 
Castellano- que inicia a la utilización 
del módulo y de todas sus opciones y 
posibilidades. 

El segundo manual es una introduc- 
ción a la notación musical -también en 
varios idiomas- en la que se incluye la 
explicación de lo que son notas (y sus 
tipos), compases, partituras, claves, 
etc. 

CONCLUSIONES 

El MUSIC MODULE es un exce- 
lente periférico para nuestros MSX. 
Gracias a él TODOS pueden adentrar- 
se en el mundo de la música ya que se 
trata de un aparato con una utilización 
extremadamente sencilla y que no pre- 
cisa de conocimientos musicales. 

Es un aparato que permite una gran 
cantidad de combinaciones gracias a 
sus 20 acompañamientos programa- 
dos, así como con los 60 instrumentos 
de que dispone y a los 4 que podemos 
sintetizar en cualquier momento gra- 
cias al digitalizador de sonido. 

Para los que ya tengan unos ciertos 
conocimientos musicales y dominen al- 

fún instrumento en concreto, el MU- 
IC MODULE puede ser un aceptable 
sintetizador monofónico si se utiliza el 
teclado de los MSX o polifónico si se 
utiliza el teclado opcional. 

Los acompañamientos son poco re- 
comendables para este tipo de usua- 
rios, ya que no se puede variar la se- 
cuencia de acordes que los componen, 
ni variar su tono. No se adaptan, por 
tanto, a las necesidades musicales de al- 
guien que desee interpretar o compo- 
ner cualquier tema. 

Por último, el MUSIC MODULE,, 
gracias a sus opciones para los efectos 
especiales pueden convertirse en una 
divertida mesa de efectos doméstica 
que permita a los aficionados mezclar 
con sus melodías o discos cualquier 
tipo de efecto de los mencionados. 
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Programa 



Por Josep Laínez S.i 



INSTRUCCIONES Y 
VARIABLES DE C.A.D. 



Este programa, permite hacer 
cualquier tipo de gráfico, guar- 
darlo en un cassette o recupe- 
rarlo de la misma, o bien, obtener el 
gráfico por la impresora. Se controla el 
cursor con un joystick en el port 1 o 
con las teclas del cursor. Estas son las 
funciones de algunas teclas: (las que he 
programado). 

,: sirve para bórrar punto a 

punto; 

.: sirve para dibujar punto a 

punto; 

HOME: sirve para borrar toda la pan- 
talla. Si se pulsa esta tecla, 
además del efecto ya descri- 
to, el cursor vuelve al centro 
de la pantalla; 

ESC: esta tecla sólo se usa para de- 
terminadas acciones en las 
opciones F-3 y F4; 

F-l: sube o baja el lápiz, depen- 
diendo de como esté el flag 
L. Si L es igual a uno, el lápiz 
estará activado; si es cero se 
desactiva; 

F-2: esta opción sirve para relle- 
nar espacios cerrados. Su 
funcionamiento es idéntico 
al de la instrucción PAINT 
del BASIC; 

F-3: en esta opción puede trazar 
una línea, un cuadrado y/o 
rellenarlo; 

F-4: aquí se permite trazar círcu- 
los o arcos de círculo, esco- 
giendo entre 15 opciones di- 
ferentes; 

F-5: pulsando esta tecla se selec- 
ciona el menú de INPUT/ 
OUTPUT, en el aue puede 
escoger el modo de almace- 
namiento de la imagen, cinta 
o papel, o si desea cargar un 
dibujo a medio terminar. 

COMO TRAZAR LINEAS 

Ponga en marcha el programa y pul- 
se F-3. 

Lleve el cursor al punto de pantalla 
que desee, con las teclas del cursor o un 
joystick, y pulse "ESC". A continua- 
ción vuelva a pulsar cualquier tecla de 
cursor y aparecerá un segundo cursor. 




0(2TT) 



Llévelo a donde quiera, y pulse una op- 
ción de entre las siguientes: 
tecla 1 (uno): traza una línea uniendo 
los cursores; 

tecla 2: traza un cuadrado o rectángu- 
lo; 

tecla 3: traza un cuadrado o un rectán- 
gulo, pero lo rellena. 

Después de pulsar una de estas op- 
ciones el cursor auxiliar desaparecerá. 

TRAZADO DE CIRCULOS O 
ARCOS DE CIRCULOS 

Para acceder a esta parte de progra- 
ma pulse F-4. 

Actúe del mismo modo que en el 
caso anterior, pero cuando desee de- 
terminar el punto del cursor auxiliar, 
pulse "ESC". Escoja una de estas op- 
ciones: (ver fotocopia adjunta para es- 
clarecer dudas). 

tecla 1 (uno): traza un arco desde 2/4 
PI hasta 3/4 PI 

tecla 2: traza un arco desde 2/4 PI hasta 
4/4 PI 

tecla 3 : traza un arco desde 2/4 PI hasta 
5/4 PI 

tecla 4: traza un arco desde 2/4 PI hasta 
6/4 PI 

tecla 5 : traza un arco desde 2/4 PI hasta 
7/4 PI 

tecla 6: traza un arco desde 2/4 PI hasta 
2PI 

tecla 7: traza un arco desde 2/4 PI hasta 
PI/4 

tecla 8: traza un arco desde 2/4 PI hasta 
6/4 PI 

tecla 9: traza un círculo completo 
tecla (cero): traza un arco desde 4/4 
PI hasta 2 PI 

tecla ! : traza un arco desde 2PI hasta 4/ 
4PI 




tecla arroba: traza un arco desde PI/4 
hasta 5/4 PI 
tecla : 
PI hasta 

tecla $: traza un arco desde 3/4 PI hasta 
7/4 PI 

tecla %: traza un arco desde 7/4 PI 
hasta 3/4 PI 

El radio será la distancia entre el cur- 
sor y el cursor auxiliar. 

RECUPERANDO Y 
GUARDANDO DATOS 

Pulse F-5. 

A continuación, si desea grabar una 
pantalla, inserte un cassette en la gra- 
badora y pulse REC&PLAY. 

Si lo que desea es recuperar una pan- 
talla pulse PLAY, cuando el cassette 
que contenga el fichero esté en la gra- 
badora. 

Si quiere obtener el gráfico en papel, 
prepare la impresora. 

Después de hacer estas operaciones, 
según lo que quiera hacer, pulse una 
opción: 

tecla 1 (uno): salida del gráfico por la 

impresora. La rutina utilizada es la 

COPY-LPRINT de Rubén Jiménez, 

aparecida en MSX EXTRA. 

tecla 2: con esta opción podrá grabar la 

pantalla 

tecla 3 : con esta opción podrá recupe- 
rar una pantalla, grabada previamente. 
Las rutinas grabación/lectura apare- 
cieron en la revista MSX EXTRA, en la 
sección CALL. 

POSIBLES AMPLIACIONES 

La mejor ampliación se puede hacer 
en la rutina de INPUT/OUTPUT, 
añadiendo las opciones necesarias para 
recuperar o guardar datos en un dis- 
quete. 

Otra buena mejora sería poner en un 
lado de pantalla, unos marcadores que 
indicaran el radio cuando se hacen cír- 
culos, y las coordenadas del cursor en 
todo momento. Se podrían hacer estas 
mejoras, a costa de menor velocidad de 
ejecución del programa, y menor su- 
perficie de dibujo en la pantalla. 
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iret (ZAP STUDI), 



UN PROGRAMA 

INTERACTIVO 
PARA EL MSX 



Por fin un programa que 
compatibi liza las presta- 
ciones interactivas del 
MSX2. En este artículo 
os resumimos el menú 
del programa y os indi- 
camos la mejor forma de 
utilizarlo. 







EL MSX 2 o la revolución 
interactiva del ordenador 

Hace un año aproximadamente 
que aparecieron los primeros 
MSX2 en el mercado. Al igual 
que sus equivalentes de otras marcas 
(Atari, Commodore, Amstrad, etc..) 
antes fue el hardware que el software, 
provocando que hasta la actualidad el 
uso de estos ordenadores sea limitado, 
debido a la falta de información sobre 
su manejo. 

Digitalizací* 
de imagen 

Sin embargo el MSX2 nos ofrece la 
posibilidad instántanea de su utiliza- 
ción, gracias a su buen soporte y com- 
patibilidad de sus componentes. El 
gran problema de los ordenadores al 
querer pasar las imágenes producidas 
en ellos a vídeo, es la incompatibilidad 
entre los diferentes tipos de señal, que 
motiva que la imagen de ordenador no 
sea bien recogida por la cinta de vídeo. 
Todo esto se traduce en sacudidas de 
imagen, falta de definición, pérdida de 
color, aparición de extrañas barras, 
etc. Esta compatibilidad también se ha 
de tener en cuenta cuando queremos 
que el ordenador "vea" la imagen ví- 
deo y actúe sobre ella pudiendo sinteti- 
zarla y hacerla "entendible" por la me- 
moria del ordenador. Todas estas ope- 
raciones son cubiertas fácilmente por 
el MSX2, el cual está preparado, ade- 
más de para el diseño o la generación 
de caracteres, también para la digitali- 
zación y superposición de imagen ví- 
deo. 

El MSX2 puede tratar la imagen sin 
necesidad de ningún software. En su 
BASIC contamos con la sentencia SET 
VIDEO, la cual nos permite según le 
indiquemos, las operaciones de super- 
posición, digitalización y la generación 
de sincronías. 

Para que estas sincronías ordena- 
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dor-videotape se produzcan, el MSX 
cuenta con un interface especial llama- 
do comercialmente VIDEOTIZER. 
Este aparato se emplea, sobre todo, 
para generar sincronías entre los peri- 
féricos conectados en sus entradas o sa- 
lidas de señal. En el medio vídeo, el 
aparato que crea las sincronías es lla- 
mado GENLOCKER, normalmente 
las cámaras de videograbación están 
dotadas con estos generadores de sin- 
cronías. 

Si no se dispone del VIDEOTIZER, 
algunos standars permiten la recepción 
de imagen vídeo a través de una entra- 
da de RF (Radio Frecuencia), pero no 
vamos a tratar aquí la manera efe traba- 
jar el MSX2 en BASIC, sino a través del 
programa Grafic Editor, que pasamos 
a analizar seguidamente. 



Carga del programa 

La operación de carga del Graphics 
Editor, es bien sencilla. Sólo es necesa- 
rio conectar el ordenador con el pro- 
grama ya introducido en la disquetera, 
y el programa se empieza a cargar in- 
mediatamente. En caso de tener el or- 
denador ocupado con otro programa, 
sólo hemos de introducir el diskette 
con el Graphics Editor en la disquetera 
y presionar el Reset, el ordenador car- 
gará el programa. 

Configuración del menú 

En unos momentos aparece el menú. 
El menú pone a la vista el medio para 
conectar con todas las órdenes y posi- 
bilidades que ofrece el programa. Ve- 
mos que este se nos presenta mediante 
varias secciones diferenciadas por pe- 
queños dibujos que indican la presta- 
ción que podemos utilizar. Tal como se 
nos ha presentado el menú, vemos que 
dispone de varios tipos de lápices, va- 
rios tipos de curvas y formas geométri- 
cas, y otras posibilidades. Antes de in- 
troducirnos por completo en la des- 
cripción del menú, veamos un momen- 



to la manera en la que podemos trans- 
mitir las órdenes al menú por las cuales 
elegimos las diferentes alternativas del 
programa. 
Ver figura 1. 

La esfera, un periférico 
necesario 

Igual que dominamos la dirección 
de un sprite mediante un joystick tam- 
bién podemos dirigir el cursor en las 
direcciones elegidas. Para controlar el 
cursor del Graphics Editor podemos 
usar una esfera que nos permite ir a la 
parte de pantalla que deseamos lo más 
rápidamente, intentando conservar el 
tacto de la mano y transmitirlo a la pan- 
talla del ordenador. También podemos 
controlar el cursor del Graphics Editor 
usando el teclado, las teclas Fl, F2, F3 
y las teclas del direccionamiento del 
cursor, pero perdemos velocidad en el 
manejo del cursor, al mismo tiempo 
que se pierde "sensibilidad" cuando se 
realiza un dibujo. 

Para transmitir órdenes con la esfe- 
ra, se usan las teclas que la acompañan. 
Según los colores de las teclas permiten 
una operación diferente: 

Tecla roja: ejecuta las órdenes. Al 
presionar el botón rojo sobre el menú, 
elegimos opción. Al presionar el botón 
rojo sobre la pantalla ponemos en mar- 
cha la opción elegida. 

Ejemplo: Situamos el cursor sobre el 
lápiz que indica líneas rectas, presiona- 
mos la tecla roja. Acto seguido, el menú 
desaparece, el cursor cambia su forma 
de flecha por la de una especie de pun- 
to de mira. Trasladamos dicho punto 
de mira a la parte de pantalla donde se 
desea empezar el diseño. Se presiona la 
tecla roja. Seguidamente se dibuja una 
línea. Movemos el cursor hasta el si- 
guiente punto, si se quiere trazar nue- 
vamente una línea se presiona la tecla 
roja. 

Tecla amarilla: Anula o suspende ór- 
denes, llama al menú. 

Ejemplo: Seguimos el ejemplo ante- 
rior. Nos encontramos con que esta- 




Tabla de colores. 



¡YA ESTA AQUI! 



NO ES UN JUEGO DE "MARCIANOS 
NO ES UN JUEGO DE AVENTURA 
NO ES UN PROGRAMA DE UTILIDAJ 
Es... ¡¡LOTO!! 




El programa que puede hacerte 

millonario 
i ¡ El complemento ideal a nuestro 
programa de quinielas, de probados 

resultados!! 
¡La manera más barata de hacer má¿ 
combinaciones! 



Y TAN SOLO 



POR 800 PTAS. 



Pídelo hoy mismo, 
mañana será tarde 



— — — — — — 
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tivo mediante: 
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i MANHATTAN TRANSFER, S A. 
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mos haciendo rectas, estabilizándolas 
al presionar el botón rojo, y eligiendo la 
situación de las nuevas líneas al cam- 
biar el cursor de situación. Pero ahora 
ya estamos cansados de tanta recta y 
queremos cambiar de opción. Primero 
presionamos el botón amarillo para de- 
jar de dibujar, lo volvemos a presionar 
y aparece el menú. Ahora podemos 
cambiar de opción. Situamos el cursor 
sobre la opción deseada por ejemplo: 
lápiz libre, volvemos a presionar el bo- 
tón rojo para elegir opción y volver al 
dibujo. 

Tecla blanca: Normalmente sólo sir- 
ve para acceder a la paleta de colores 
una vez elegida la opción. 

Ejemplo: Estamos en la pantalla de 
dibujo con la opción de dibujo de lápiz 
libre hemos dibujado un poco, pero 
ahora queremos cambiar de color la 
tinta del lápiz. Podemos hacerlo vol- 
viendo al menú y pidiendo el color en 
la sección de paleta de colores, pero 
después nuevamente nos veremos obli- 
gados a señalar la opción deseada. Para 
ahorrarnos esos pasos, podemos acce- 
der directamente a la paleta de colores 
presionando la tecla blanca: aparece la 



paleta, elegimos el color presionando 
el botón rojo, presionamos la tecla 
amarilla, y volvemos a la pantalla del 
dibujo donde podemos seguir realizan- 
do la imagen en proyecto. 

Elementos que configuran el 
menú 

Tal como se nos presenta el menú al 
carga'r el programa podemos distinguir 
varias partes. A la izquierda tenemos: 

Paleta de colores. 

Vuelta al paso anterior. 

Opción de tramas. 

Opción tipo de punto a utilizar para 
el trazo de líneas. 

Anulación del menú y del cursor, 
para ver el dibujo totalmente sin impe- 
dimentos. 

Lápiz volcado, a través de él se acce- 
de a la opción SET que incide sobre los 
elementos de la parte derecha del 
menú. 

En el centro del menú nos encontra- 
mos con tres apartados diferentes, ac- 
cedemos a cualquiera de ellos apretan- 
do la tecla roja sobre el dibujo corres- 
pondiente, de esta manera entramos en 



tres tipos de apartados: 

El simbolizado por el lápiz: elemen- 
tos de diseño. 

El simbolizado por la tarjeta perfo- 
rada: elementos de memoria. 

El simbolizado por unas tijeras: ele- 
mentos del tratamiento de imagen. 

Dentro de los elementos de diseño, 
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Dos secuencias de una animación. 
M. Miret Videografía. ZAPSTUDI. 
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nos encontramos los siguientes compo- 
nentes: 

Lápiz libre: nos permite trazar líneas 
al tiempo que movemos el cursor. 

Escoger color de tinta de la pantalla: 
A través de esta orden podemos esco- 
ger un color situando el cursor sobre el 
color elegido. 

Líneas rectas: Traza líneas rectas si- 
guiendo las coordenadas del cursor. 

Borrar (Goma de borrar): Borra en 
color blanco, o color elegido. 

Spray: Pinta conforme lo hace un 
spray, difuminando los puntos de co- 
lor. 

Perímetro de un cuadrado: Pinta pe- 
rímetros o siluetas de.cuadrados. 

Cuadrado por zonas: Pinta un cua- 
drado y toda su superficie con el color 
elegido. 

Circunferencias o arcos de circunfe- 
rencia: Traza circunferencias o arcos. 

Texto: A través del teclado, utilizan- 
do dicha orden, podemos escribir los 
textos que necesitemos. 

Pincel: Llena de color zonas de color 
o superficies. 

Elementos de la memoria 

Con la ayuda de este apartado pone- 
mos en funcionamiento órdenes rela- 
cionadas con el uso de la memoria: 

Borrar pantalla: Borra totalmente 
todo lo diseñado en la pantalla del or- 
denador. 

Basura (extraer): Extrae de la me- 
moria un dibujo introducido previa- 
mente en esta función. 

Basura (introducir): Introduce o 
guarda en la memoria una zona de pan- 
talla seleccionada mediante esta orden. 

Copia de dibujos borrando el origi- 
nal: Copia un área de un dibujo selec- 
cionado, permite "llevarlo" a otro lu- 
gar de la pantalla. Al "fijar" el diseño 
en su nuevo lugar, "desaparece" el di- 
seño original. 

Copia dibujos respetando el origi- 
nal: Se pueden hacer copias múltiples 
del dibujo original sin que "desaparez- 
ca" o se borre el diseño original. 

LOAD: Lee los diseños realizados 
con el Graphics editor almacenados en 
diskettes. 

SAVE: Graba los dibujos realizados 
con el Graphics Editor en diskettes 
previamente formateados. 

Diskette: Gracias a esta orden pode- 
mos formatear los diskettes que tengan 
que ser usados en el Graphics editor. 
También accedemos a la orden "dele- 
te" que nos permite borrar del diskette 
los diseños que no deseamos conser- 
var. 

Flecha girada: Nos permite cambiar 
la orientación de un diseño. 



Flecha volcada: Invierte la orienta 
ción de un diseño, poniéndolo "boca 
abajo". 

PRINT: Gracias a esta orden acce 
demos a la impresora, que nos imprime 
el dibujo que tenemos en pantalla. 



Elementos del tratamiento de 
imagen 

Pantalla tachada: Borra el dibuje 
que tenemos en imagen. 

Flecha girada: Nos permite girar un 
diseño en el ángulo deseado. 

Cámara fotográfica: Accionando 
esta orden podemos poner en funcio 
namiento la interactividad del MSX2 
consiguiendo digital imagen prove- 
niente de RF, RGB, o compact disc 
También se puede superponer imagen 
del ordenador, sobre imagen vídeo 
(Esta orden actúa preferentemente 
cuando se tiene conectado un VIDE( ) 
TIZER). 

Mosaico: Con esta orden podemos 
cambiar el tamaño de los puntos cua 
drados que componen un diseño. Los 
podemos hacer más grandes o más pe- 
queños. 

Arbol: El árbol nos permite hacei 
"el perfil" sobre un dibujo o área elegí 
da. 

Flecha gruesa: Hace negativo sobn 
un área elegida, cambiando todos lo> 
colores por su inverso. 

Traslado de colores: Cambia el eoJol 
de un área por otro previamente elegí 
do. 

Ampliación y reducción: Amplía v 
reduce zonas señaladas a través del 
área. 

Conclusión 

Hasta aquí hemos visto la forma t\v 
introducirnos en el Graphics Editoi 
Nos ha quedado claro el manejo del 
cursor a través de los joysticks, la esfcr.i 
y el teclado. Hemos estudiado el menú 
orden por orden, pero aún nos qued 
mucho, dejamos para un próximo ea 
pítulo el estudio de la orden SET, qm 
nos permitirá acceder a la memoria de 
algunas órdenes y el poder modifica i 
las o seleccionar su modo de actuación 
Después, ya sabido el manejo del 
menú, plantearemos las conexiones del 
ordenador con otros periféricos, y por 
último pondremos unos ejemplos 
prácticos para dibujar con soltura y ra 
pidez usando el Graphics Editor. 

NOTA: Todas las experiencias aquí 
expuestas han sido realizadas con el 
Hardware HB-6900P, y el vídeo Image 
Interface HBI-6900P de Sonv. 



¡¡EL "NO VA MAS" DE 



LAS VIDEOVENTTJRAS 
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CON GARANTIA \ 

/^W4ATW TRANSÉ SA 



Conviértete en el 
mago que debe destruir 
el hechizo del castillo 
diabólico por sólo 800 
ptas., (las mejor em- 
pleadas de este verano). 

Una apasionante vi- 
deojuego que une a sus 
excelentes gráficos esos 
elementos de acción e 
intriga que hacen impo- 
sible "despegarse" de la 
pantalla del monitor. 
¡¡Pídelo antes de que se 
agote!! 
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CAMELOT WARRIORS, 
NUEVO VIDEOJUECO DE 
DINAMIC 

Presentado por Microdigital 
Soft 

Microdigital Soft, acaba de lan- 
zar un nuevo título: Camelot 
Warriors. Editado en forma- 
to cassette, el videojuego contempla 
una increíble situación: En el mundo 
de Camelot, han entrado 4 elementos 
del siglo XX. Estos son: "La voz de 
otro mundo", "El espejo de la sabidu- 
ría", "El elixir de la vida" y "El fuego 
que no quema". Un viaje sin retorno a 
través de mundos pasados y futuros. El 
juego transcurre en cuatro escenarios 
distintos: En primer lugar, el bosque, 
escenario natural en el que nos esperan 
numerosos enemigos. El lago, en el que 
medusas, peces asesinos y un terrorifí- 
cio ambiente, nos provocarán un shock 
mental. Las grutas: sumergido bajo tie- 
rra y con grandes dificultades para res- 
pirar, deberás buscar una salida. El 
castillo de Camelot: si logras entrar, 
descubrirás la clave de tanto misterio. 
Los personajes que aparecen en el jue- 
go son: Aznath, el druida del bosque, 
Kindo, hermano de Neptuno y rey del 



lago, Azornic, el poderoso dragón rey 
de las grutas y Arturo, rey de Camelot. 



asa 

Impresoras Amstrad 

Los tres nuevos modelos de im- 
presoras lanzadas por Amstrad 
al mercado, se caracterizan por 
su excelente relación calidad/precio. 
El modelo más económico es el DMP 
2000, una impresora potente, cómoda 
y que cubre perfectamente las necesi- 
dades de cualquier ordenador domés- 
tico. Con una impresión de hasta 150 
caracteres por segundo y un juego de 
caracteres ASC II, su precio es de tan 
sólo 39.500 + IVA. Ligeramente supe- 
rior se demuestra el modelo DMP 
3000. Con un precio en la calle de 
49.900 pesetas + IVA, combina a la 
perfección la versatilidad de un con- 
junto de códigos de control standard, 
con la experiencia de Amstrad en el di- 
seño y fabricación de equipos de alta 
calidad y bajo precio. Sus característi- 
cas más relevantes son su carga frontal 
de papel, el bajo nivel de ruido, y la 
compatibilidad de sus códigos de con- 
trol con Epson. La hermana mayor de 
la gama, es el modelo DPM 4000. Pue- 
de manejar papel de 15 1/2 pulgadas, 
posee una elevada velocidad de impre- 
sión: hasta 200 caracteres por segundo, 
bajo consumo, posibilidad de utiliza- 
ción con fricción o tracción y juego de 
caracteres gráficos en IBM. Precio: 
89.900 más IVA. 



HOMICIDIO EN EL 
ATLANTICO: "SOFT " DE 
LUJO 

Distribuido 
Infc 

Infogrames/Sony, acaba de poner 
en circulación Homicidio en el 
el Atlántico, un vídeo-juego en for- 
mato cassette y disco, del que, además 
de sus excelentes capacidades recreati- 
vas, grafismo y contenido, hay que des- 
tacar su gran presentación. En efecto, 
la cinta o disco está contenida en una 
magnífica carpeta de tela con acabados 




en verde. Al tratarse de un juego de in- 
vestigación detectivesca, se incluyen 
toda una serie de documentos, cartas e 
impresos para facilitar la tarea. Todo 
cuidado al detalle. Asimismo, el ma- 
nual de explicaciones que acompaña al 
conjunto es de lo más completo. A 
esto, se le llama buen gusto. 



m-irinc 




SECUNDA UNIDAD DE 
DISCO PARA ORDENADOR 
SVI-738 

Lanzamiento de Spectravídeo 

La unidad de Disco presentada 
por Spectravídeo, es un sistema 
lector de discos de 3,5 pulgadas 
y 720 KBytes de capacidad una vez for- 
mateado. Su diseño, está especialmen- 
te concebido para incorporarse como 
segunda unidad del ordenador SVI- 
738. Una característica remarcable, es 
que el controlador y la alimentación se 
encuentran en el ordenador, con lo 
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cual el tamaño y el cableado quedan 
muy reducidos. Al igual que otras uni- 
dades de disco Spectravídeo, está pre- 
parada para utilizar los Sistemas Ope- 
rativos MSX-DOS y CP/M. Conecta- 
da como segunda unidad de disco al 
ordenador SVI-738, le confiere una 
mayor capacidad de almacenamiento, 
necesaria en ciertas aplicaciones de 
gestión. 




ACUERDO IDEALOGIC-SVI 

Idealogic y SVI han firmado un im- 
portante acuerdo mediante el cual 
la primera va a suministrar el pro- 
grama Perry Masón para incorporar a 
su nuevo ordenador XPRES 16, como 
Software de dotación suministrándolo 
junto con cada ordenador. Asimismo, 
SVI ha adquirido otros programas de 
la serie Telarium para su XPRES 16 
que convertidos a este ordenador, ad- 
quieren características especiales al au- 
nar la capacidad del PC MS-DOS a la 
potencia gráfica de los MSX2, con lo 
que tenemos unos programas de unos 
gráficos y presentación muy importan- 
tes. 



SERMA: INTERESANTE 
OFERTA EN EL CORTE 
INGLES 

Promoción de los cartuchos 
Konami 

A través de los quioscos que Ser- 
ma ha instalado en los centros 
comerciales de la cadena «El 
Corte Inglés», se ofrece una interesante 
oferta en forma de regalos. El procedi- 



miento es muy simple: por cada com- 

Sra efectuada, te entregan un cupón, 
euniendo dos cupones, tienes dere- 
cho a un bolígrafo llavero; con cuatro, 
el regalo es una pluma de neón, un reloj 
de cristal de cuarzo por seis cupones... 
y un jovstick Konix por la entrega de 
ocho. Animaos a hacer vuestras com- 
pras veraniegas, el plazo se cierra el 
cuatro de julio. 



¡FANTASTICOS RÚALOS! 



i 



PROYECTOS DE 
PERIFERICOS PARA 
AMSTRAD Y MSX 

# Quién no ha sentido la tentación 
^ de ampliar las posibilidades de su 
\^ ordenador construyendo ingenio- 
sos periféricos con los que poder medir 
la velocidad y dirección del viento, sa- 
ber la temperatura ambiental o dispo- 
ner de un digitalizador de imágenes? 

Pues bien, los usuarios de MSX es- 
tán de suerte, ya que en este libro en- 
contrarán la manera sencilla de cons- 
truir algunos de esos ingenios. 

Lo más asombroso es la escasez de 
cableado, usándose principalmente 
circuitos integrados y unos pocos tran- 
sistores. Esto lo convierte' en un libro 
útil hasta para principiantes. 

A cada ingenio le acompaña un sen- 
cillo programa que podrá ser sofistica- 
do según la pericia del usuario. 

Tanto los circuitos como los progra- 
mas han sido probados en el modelo 
CPC 464 de Amstrad. Por parte de los 
MSX ha sido probados en un Thoshiba 
HX-10, que es compatible con todos 
los ordenadores que se ciñan a las nor- 
mas de MSX. 




MICROMAN 



Proyectos de 
periféricos para 
Amstrad y MSX 

Owen Bishop 

ANAYA 








En el libro se desarrollan los siguien- 
tes periféricos: 

- FUENTES DE ALIMENTACION 

- DIGITALIZADOR DE DIBUJO 

- TECLADO REDUCIDO 

- CONTROLADOR DE 
MAQUETAS 

- PITADOR 

- CONTROLADOR DE 
INTERMITENTES 

- CONTROLADOR ANALOGICO 
DE MODELOS 

- .... Y 11 periféricos más. 

Este útilísimo libro ha sido editado 
por. ANAYA MULTIMEDIA, en el 
marco de su nueva y práctica colección 
"Mícromanuales". 

Atención al precio que es muy inte- 
resante, sólo 636 ptas. Un precio redu- 
cido para una obra completa y amena. 

Vidal Barbero Valladares 



AVISO IMPORTANTE 



Debido a un lamentable error, 
en el anuncio del programa LOTO 
aparecido en el número doble de 
MSX-EXTRA (32-33) se indicaba 
que se remitieran los talones a 
nombre de MSX CLUB DE CAS- 
SETTES. 

LOS TALONES DEBEN EN- 
VIARSE A NOMBRE DE MAN- 
HATTAN TRANSFER, S.A. 

Al igual que en el caso de cual- 
quier otro programa perteneciente 
al MSX Club de Cassettes. 

Rogamos disculpen las moles- 
tias que este error pudiera haber 
ocasionado. 
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ES3 ES EL ORDENADOR FAMILIAR N.° 1 
CS3 ES LA FAMILIA MAS IMPORTANTE 
DE MICROORDENADORES 
LOS USUARIOS DE 111^' 

FORMAN UNA GRAN W™* w íílsa 7 , 

FAMILIA E»""»» MPlf? 



¡¡NO TE OLVIDES DE gSB"*U i 
NUESTRA FAMILIA!! £~ *¿; 
YA ESTA EN LA CALLE EL 
NUMERO DOBLE & r ^ÍIfa 
DE VERANO IB» 
DE NUESTRA REVISTA £jg> ; 1 
HERMANA E53 EXTRA ^ 4MS 

En ese número doble te encontrarás con: 

- MSX-Segunda generación 

(La sección de los usuarios de MSX-2) 

- Redefinición de caracteres en SCREEN 2 

- Todo sobre los robots 

- Tratamiento de ficheros 



i te caracteres 



ta* M 



¡SUPE/? 
BIT-BIT! 



- Y un montón de programas 



¡¡¡CORRE A BUSCARLO!!! 



YA ESTA EN TU QUIOSCO 



■ 



^£ PLUSDATA ESPECIALISTAS EN PROGRAMAS EDUCATIVOS 



3 

si 
§ 



THE 



LINKWORD 
ÍUAGE SYSTEM 





LINKWORD 




INGLES* i 



i 



na 



LONDON - LINKWORD 



-e- 

© ® 



MSX 



Curso Inglés I 

Curso Inglés II 

Curso Inglés 1+ II 

Curso Basic I 

Curso Basic II 

Curso Basic 1+ II 

Programa Contabilidad General 

Programas Educativos 



P.V.P.conl.V.A. 



3.900,- 
6.900,- 
9.490,- 
5.900,- 
5.900,- 
9.900,- 
6.900,- 




Soporte 



Disco 3 1/2" y cassette 
Disco 3 1/2" 

Disco 3 1/2" y cassette 
Disco 3 1 12" y cassette 

Disco 3 1/2" 

Disco 3 1 /2" y cassette 



Programas Educativos, P.V.P. 2.500 pts. 



PL1016 Artículo 

PL003 L'Article 

PL1020 Juego con sílabas 

PL1023 Ordenar Frases 

PL1009 Vocabularios 

PL1 01 4 Verbos ser, haber, estar 

PL1011 Verbos 2 (Irregulares) 




PL1004 Tres en raya 

PL1 01 Análisis morfológico 2 

PL1006 Vocabulario 7 

PL0022 El reloj 

PL3006 España política 

PL2002 Comarcas de Catalunya 

PL3001 Geografía de Europa 



PL0020 Contar 

PL0024 Restar-Contar 

PL0029 Cálculo serie 

PL0038 El mono y el árbol 

PL0006 Tabla de multiplicar 

PL0004 Cálculo inicial 

PL0046 Problemas cálculo mental 

PL0001 Divisiones 

PL0002 Cálculo mental 



NOVEDADES: Inglés II, la 
esperada continuación del 
curso de inglés Plusdata, 
Basic l+ll, Contabilidad, 
Programas Educativos. 

INSTALAMOS 
AULAS 
INFORMATICAS 
EN ESCUELAS 



PL0005 Sistema métrico decimal 
PL0003 Fracciones 2 
PL0015 Sistema de ecuaciones 



Nombre 

Apellidos 

Dirección 

Población 

D.P 

Forma de pago: 



Reembolso □ 



Tino 

Giro postal □ 



Envío talón □ 



PROGRAMA 


PRECIO 


FORMATO (disco o cassette) 
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